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CONFIDENTIAL PROPRIFTARY INFORMATION 

THIS ITEM IS THE PROPERTY OF OATAPOINT CORPORATION, SAN ANTONIO, TEXAS, AND CONTAINS CONFIDENTIAL AND 
TRADE SECRET INFORMATION, THIS ITEM MAY NOT 8E TRANSFERRED FROM THE CUSTODY OR CONTROL OF DATAPOINT EXCEPT 
AS AUTHORIZED 8Y DATAPOINT AND THEN ONLY BY WAY OF LOAN FQR LIMITED PURPOSES'. IT MUST NOT BE REPRODUCED 
IN WHOLE OR IN PART AND MUST BE RETURNED TO DATAPOINT UPON REQUEST AND IN ALL EVENTS UPON COMPLETION OF 
THE PURPOSE OF THE LOAN, 

NEITHER THIS ITEM NOR THE INFORMATION IT CONTAINS MAY BE USED OR DISCLOSED TO PERSONS NOT HAVING A NEED 
FOR SUCH USE OR DISCLOSURE CONSISTENT WITH THE PURPOSE OF THE LOAN, WITHOUT THE PRIOR WRITTEN CONSENT OF 
DATAPOINT, 
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FLEK/TXT 



OATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE I 
MICROwpROCESSOR FLEXIBLE DISKETTE CODE • HJS m 



78JUL8^ 11144 



COMMAND LINE W*8« SNAP3 FLEX, , ,PROC|GBOLX 



INCLUSION 
INCLUSION 
INCLUSION 
INCLUSION 
INCLUSION 
INCLUSION 
INCLUSION 
INCLUSION 
INCLUSION 
INCLUSION 



At PROCPARM/TXT 

Bl PMACMIC/TXT 

C: GMACROZ/TXT 

Dl PORTAS0N/TXT 

ES PROCEQUS/TXT 

FI MOEF18II0/TXT 

G: BOEFi800/TXT 

Hj PORTEOUS/TXT 

n DDEF1800/TXT 

J! H5EF1800/TXT 



PROGRAM NAMES FLEX 
PROGRAM ADDRESS 8L0CKSJ 



EXTERNAL DEFINITIONS: 



MBPAGE 
INFO 



(S0S730 



1674013 

000000 



FXIO 



/ABSOLUTE/ 

/SYSIVR/ 

/SYSROM/ 

/FLEXL/ 
/FLEXP/ 



?|05231 



8nE«0eif009l (A8S) 

SIZE«0ei040i CABS} 

8nE«0fi0047 CABS3 

siiE'mzm?> CABS) 

8nE«««400i CREL) 



FXSTAT 



005652 



UBIO 



005671 



EXTERNAL REFERENCES CUNOEFINEO SYMBOLS) 8 
SRVeSN SRVOO SRVRPT FETCH FETCHI 
UNUSED LABELS! 
DOREAD FOINIT 



IVIOLS 



PAGE 



FLEX/TXT 



DATAPOINT CONFIDENTIAL INFORMATION * SEE PAGE I 
MICRO-PROCESSOR FLEXIiUE DISKETTE CODE - HJ8 • 



78JUL20 li:44 



J; 

I; 

10. 

izj 
la; 

iS. 

21. 



• 8 ^ 9 ^ K 

• £ y 9 • J 

t 2p9pH 

• 2 ^ 9 ji G 

. 2f9.P 

t 2 ^ 9 |i C 

• 299yB 

• 2 1 9 » A 

* 

• 2«8« A 

• 2 1 7 » 

• 2«H«B 

• 2p SfC 
t 2 * 9 ■ A 
* 



INC 

HJ8 
HJS 
HJS 
HJS 
HJS 
HJS 
HJS 
HJS 

HJS 
HJS 

HJS 

HJS 

HJS 
HJS 



PROCPARM 



17 
17 
13 

12 
12 

2« 
H 



APR 
MAR 
FEB 
JAN 
JAN 
DEC 
NOV 
NOV 



78 
78 
78 
78 
78 
77 
77 
77 



22 SEP 77 
16 SEP 77 

7 SEP 77 

31 AUG 77 

16 AUG 77 
12 JULY 77 



SETUP FOR RELOCATABLE » USING LESS REGS 

OPTIMHE HDR CHECK IF NO SRVREO PENDING 

MEMPF EVERYWHERE (CORRECT M88TAT5 

ADD COMMENTS (MINOR FIXES TOO) 

FIX WRITE BIAS CURRENT BUG (FINALLV?) 

FIX BUGS • INFO - SYSTAT ADDED 

FIX MINOR BUGS 

APF FIX AND PADDING MOD 

FIX BUGS CREATED WHEN ROOM MADE 
MAKE ROOM FOR MTI CRC ROUTINE 

BUG-FIX AND MINOR MODES FOR NEW RELEASE 

CONVERTED FOR MTI VERSION fCRC) 

CORRECTED THE COMMENTS AS NEEDED 
UPDATE TO MATCH VRP CONTROL FORMAT 



OATAPOINT CONFIDENTIAI, INFORMATIOM • SEE PAGE 1 
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FLEX/TXT 



MICRO-PPOCESSOR FLEXIBLE DISKETTE 
. EXTENDED CONDITIONS, AND SYSTEM 



CODE » HJ8 • 7BJ\}12B 
REGISTER DEFINITIONS 



US44 



82l 

83^ 

24^ 

25j 
26« 
27l 
28j 

30l 
3lJ 
32. 
33y 
34; 
35, 
36, 
37. 
381 
39; 
48, 

42l 
43, 
44. 
451 

4e. 
47I 

48, 

49, 

50, 

51, 
52, 

53*, 



004^00 

004P»i0U 



HELPFUL TNFORNATION CI HDPE) j 

IF WRITE SINGLE, 00 IT, IF HEADER HAS IN THE DATA FIELD, USER DESERVES WHAT 
THE USER GETS BECAUSE WAS DOUBLE DENSITY DATA SECTOR 

IF WRITE DOUBLE AND SET O.C. GAP FAILURE (CHECK THAT THAT WAS IT) 
MARK THAT A MISTAKE SEEN AND ATTEMPT TO RE-READ A HEADER AGAIN, 
IF HEADER FOR WRONG SECTOR THEN RE-READ HEADER AGAIN ALSO, 

DOCUMENT THAT DUE TO COMMON CODE POWPI, FOVRS » FOVRD CAN GET MEMORY FAULTS 
FROM WHERE HL POINTS (ACCESS PROTECT INCLUDED) 

NQTEji: 

DUE TO BUFFER CYCLE TIMES A BUFFER ACCESS CAN NOT HAPPEN CLOSER THAN 

1 MICRO-SEC, FROM ANOTHER (FOR DISK OR FROM HICRO'-PROC.) 

FOR SAFETY THIS CODE KEEPS ALL ITS ACCESSES OVER 2 MICRO^SEC APART, 

THE COMMANDS THAT DO IMMEDIATE CYCLES AREl 

FCOUTC, FCINOT, FCOTUP, FCWDSP, FCWRTN 

NOTEsi AGAIN it 

LOADING MICRO-PROCESSOR POINTER DOES AN IMMEDIATE BUFFER READ ANTICIPATING 
AN FCINDT (DATA IS PRE-»READ) THEREFORE FCOTUP MUST ALWAYS OCCUR AFTER DISK 
READ OPERATION HAS COMPLETED, 

A**************************************************************************** 

* 

FLEX LOGICAL SPACE DEFINED IN PLACE 

a PHYSICAL SPACE RELOCATABLE 

FLEXL USE THEM BOTH 

PLEXP PUT THE CODE IN PHYSICAL SPACE 

FLEXL, 2 WITH ADDRESSES IN LOGICAL SPACE 



FLEXL 


ORG 


FLEXP 


ORG 


FLEXL 


USE 




USE 


FLEXP 


LOC 



DATAPOINT CONFIDENTIAL INFORMATION *• SEE PAGE I 
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FUEX/TXT 



MICRO-PPOCESSOR FLEXIBUE DISKETTE CODE - HJS - 
**** INTERRUPT DRIVEN DISKETTE INTERFACE *♦*♦ 



7flJUL2e 11144 



S6 
57 
S8 
59 



6ll 

62^ 

03, 

B4, 

65. 

661 

67 

68, 

B9f 

79, 

^h 

7Zf 
74. 

76* 

^^ 
78, 

79, 
80, 
81, 
82, 
83, 
84, 
83, 
86, 
87, 
88, 
89, 
90, 
911 



, INTERRUPT 
.6SDQ 



SERVICE ROUTINE 



8S00N 



BEGIN 

M8IAK (lAKOOE)l 

STB MIFIAK 

MBIN HOOP 

LORT TEMPI 
IF M8STAT «> NOTHINGTOOO 
THEN IF eiAKODE .AND. FIADR) 
THEN MBPAGE? 



FIND WHO MAKING NOISE i WHY 



ALIAS lAKOOE 



HAOR 



AH 1 
YES, 



INTERESTED IN DEVICE? 
SERVICE INTERRUPT 



LDTR 


MBSTAT 


BRA 


BSOONiTZ 


OOTRR 


,XR,MAOR, TEMPI 


iPSX 


M8PAGE 


TSTIT 


, FIADR 


BRA 


MBPAGE,TZ 


BPGX 


$ 



SRV8SN 



TEMP I" lAKOPE .AND, FlAORl 

M8U8 CTEMP, FCOINT, 0) | 

M8US (TEMP, FCLEARi FKMAST-FKRWmF) I 

OORIR TEMPI, NO, FIADR, TEMPI 

MBUS , FCOINT, 

MBUS TEMPI, FCLEAR#FKMAST-FKRWMF 
RETURN HERE FROM DISKETTE SERVICE TO 
IF SCDSPNL IN SRVREQ 
THEN RETURN CSRVRTW) 
RETURN tOL«00) 



NO, DON'T WANT ANY MORE 
NOISE FROM INTERRUPTER 



DO OTHER BUT ONLY DISPLAY DOES IT 



DLDO 



LOPT 

TSTIT 

BRA 

BR A X 
END BSDOr 



SRVREO 
, SCDSPNL 
SRVRTW,TZ 

DLSOO 



OATAPOINT CDNFIOENTIAU INFORHATION m SEE PAGE 1 
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WlCPO-PPOCeSSOR FLEXIBLE DISKETTE COOf • HJS - 
♦*♦♦ INTERRUPT DRIVEN DISKETTE INTERFACE **•♦ 



78JUL20 11144 



92;. 

93, 

94; 

95, 

96* 

97 

98, 

99. 

im' 



1»2. 
ie'4. 



1»7, 

108. 

1091 
110. 
Ml, 
112. 
1131 
114; 



lis: 

iiej 

117^ 
US, 
II9J 
I20I 
121. 
122. 
123, 
124; 

185; 

126, 
127. 
128'. 



* 



0i400iL 



MiPAGEl 



0l34(!l0iL 

a04«i09)L 
804001L 
004002L 
iPi4Pl«?3L 
004004L 
004005L 
O;fl4(fi06L 
004007L 
»84«?1PIL 
i9'401lL 
aO40l2L 



0?!4013L 
004PI14L 
0i4015L 



01010101 

0110UU 
i00l«)001 

01il010J 
11001lf0 
01010010 
00110111 
00010001 
01010011 
00110111 
00110111 



01110001 
01000000 
10000010 



01U0000 
11110001 
10U0100 

00000001 

11111011 
00000101 
00100111 
11110011 
10010000 
00100110 
00101001 



10110001 
00110000 
00000101 



004016L 00010001 10110100 

004017L 01010010 01000000 

004020L 00000111 11U0100 

004021L 

004021L 11010000 01001001 



0i4022L 
004022L 

004022L 01010001 00000110 
004023L 11001U1 11101000 



t 
» 

MBSTRT 



GET INTERRUPT NUMBER 



BEGIN 

lAKODE l» lAKODE ,ANO, FINUMI 

MfiUS (MADRf FCOMOOi 

FOLOAO ♦ FODR0 + CM8ITS .AND, FRORV))* SET CORRECT DRIVE 

CSPECIAL ENTRY ON FDCMD « HEAD READ5 
fGOES TO HDRERO THROUGH H0STRT5 
DORI TEMPI, ND,FINUM T»REG ALREADY HOLDS lAKOOE 

OOTIR ,NO,FRDRV,MBITS.CC 

MBWAIT 

OOPI MIFDAT,AC,FOLOAD*FODR0 

M8U8A8 MAOR,FC0M00 



IF lAKODE <> FIINDX 
THEN EXIT (MBSTAT)I 

TSTIR XR, FIINDX, TEMPI. CC 



GO TO STATE SERVICE ROUTINE 
CCC FOR HOSTRT SPECIAL CASE) 



BRR M8STAT,FZ 
MBIT8 f MBITS ♦ FRIXCT; 
IF CARRY 

THEN EXIT CFXIOER)? 
EXIT (HORERD) 

DORIR MBITS, AC, FRIXCT, MBITS, CC 



COUNT INDEX INTERRUPTS 

TOO MANY INDEX PULSES IS BAD 
RESTART OPERATIONS 



HDSTRT 

BRA HDRERD,FC 
, BRA FXIOER 
, END MBPAGEI 
♦ 
MEMPFDS 

FXIOER 

, BEGIN 



(INDIRECT LINK TO HDRERO FOR FDCM05 
(80 I/O TO DISKETTE STOPPED) 



(USED ONLY BY APF MEMORY FAULT FROM) 
(TRACK/SECTOR NUMBERS IN RAM) 



MBITS l» MBITS .XOR, (FRBUSY + FRlNDX)f OFF BUSY, ON INDEX ERROR 

LOTI FRBUSY+FRINOX 
EXIT (PENOR) FINISHED 

BRA PENOR 
END FXIOERl 



OATAPOINT CONFIDENTIAL INFORMATION w SEE PAGE 1 
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HICR0«PR0CE8S0R FLEXIBLE DISKETTE CODE - HJ8 • 
♦*♦♦ INTERRUPT DRIVEN DISKETTE INTERFACE *«*♦ 



78JUL?ei 11144 



129; 

13»1 
131^ 

132: 

1331 
134^ 
135, 
1361 
137; 
138, 
1391 
140, 

i4i; 

142, 

143, 
144, 
145, 
146. 

I47l 

148, 
149, 
iSi. 



1511 

152; 
153'. 



154; 
1551 
156. 

157; 
158. 



0e)4!fl24L 



0B45I24L 0Sii0«!{!l»» Pll^li000 
0!?I4«25L 110105)10 t^immia 

0e'4Pi26L 0iii0<?i«i 9*^mmi9 



904027L 



i04027L BmiBm^ 111118100 

!?ffl4P)3eiL mm^iii Miimm 



05)4031L 
0R49I32L 
05I4PI33L 
004334L 
a(34«35L 
0ei45l35L 
004037L 
0PI4?l4fL 
004CI41L 

004042L 
004043L 
004044L 
0i4045L 
004046L 
004047L 
0i4050L 



00010B01 

0101001! 
11001100 
00110111 

01010001 
00110111 

00110111 
01010001 
000001H 

00010001 
01010011 
11001100 

001101U 

01010001 
00110111 
00110111 



11110011 
10110000 

11100100 

00100110 
00000000 
00100111 
00101001 
00000000 
1111(8101 

11110011 

00110000 
U5?11011 
00100110 
01111111 
00100111 
00101001 



»00405}L 01011001 llllUU 
>00405gL 11001111 lUlUll 



OONIO 



t 
♦ 

PENDR 

• 2.40 



BEGIN 

IF FITROK lAKOOE 

THEN EXIT CHDREAO)! 

TSTIT XR, FITROK 

BRA HOREAOiFZ 
MBITS i« MBITS .AND, 

LOTI FRBUSY 
EXIT CPENDR) 

BRA PENDR 
END OONIOl 



HAKE SURE ENDED CDRRECTLY 
NO, THEN TRY AGAIN 



il-FRBUSVl 



BEGIN 
DORR 



MBITS, XR,MSITS 



(COHMDN CODE SAVINGS) 



MBUS (MADR, FCOINT, 0) » 
M8STAT i« NOTHINGTODO? 

MBUS (MADR, FCLEAR, FKMAST + FKLOFF)| 
MBUS MADR, FCOINT, 



CLEAR INTERRUPTS AND MASK 



§AL 



MBSTAT,-»1 



(nothing-ptd^oo is ZEROn 



CSAVE 1 WORD POSSIBLE, BUT SLOWER) 
MBUS MADR, FCLEAR, FKMAST^FKLOFF 



,N0THINGT000I 
, RETURN CSRVBSN) 
BRAX SRVB8N 

, END PENORl 



ODES NOTHING! 



DATAPOINT CnNFIDENTIAL INFORMATION • SEE PAGE I 
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FLEX/TXT 



MICPO-PPOCESSOR FLEXIBue DISKETTE CODE -p HJS • 78JUL20 Ul44 
* SECTOR BEING READ • CHECK IF IT IS REALUY DOUBLE DENSITY SECTOR 



i6i; 

162; 
l«3. 
l«4^ 
165, 
l«6, 
I67l 

lis. 



170, 
171. 

1721 

173, 

174; 

175, 
1761 



177'. 

170'. 



1791 
180. 

i8i; 

182. 



00491531 



004Pt53L 
804054L 
004(?55L. 
0?«4056L 
004057L 
0et4Sl6«U 
0^40611 
004062L 
09l4i63L 
0l?!4e'64L 



0«4i6SL 

(SP4066L 

0^491671. 

00407!?!L 

0(?4PI71L 
00407?t 
0i4073U 

00407SL 
0PI4078L 
004077L 
004100L 
004101L 
004ia2L 
004103L 
004104L 



* 
DRUREO 



01000000 
11010010 

00010001 
11001100 
00110111 

00110111 

01010001 
11001100 

00110101 
11010011 



00010001 
01010011 
11001100 

00110111 

01010001 
0011011! 
00110111 
01010001 
00000111 
00010001 
01010011 
11001100 
00110111 
01010001 
00110111 
00110111 



01110000 
01001001 
11110011 
11010001 
00100110 
00101001 
00010000 
11001101 
00010101 
01001001 



11110011 
10110000 
11001000 
00100110 
00001101 
00100111 
00101001 
11101011 
11110101 

11110011 

00110000 
10U1111 
00100110 
00010000 
00100111 
00101001 



>004l05t 01011001 lllUlll 
>004106u 11001111 IIUIIU 



BEGIN 

IF (FIPNTR <> lAKOOE) OR 

NOT FSGAP IN MBIN (MADR, 
THEN EXIT CH0RERD5 

TSTIT XR, FIPNTR 

BRA HOREROjFZ 

M8U8 MADR,FCINST 



LDTI FSGAP 
MBTIN 



HUST BE POINTERS NOT EOUAL 
FCINST5 AND MUST SEE O.C, GAP 

OR GIVE UP § START ASAIN 
(lAKODE IN T^REG) 



BRA HORERD,TZ 
M8U8 (MAOR, FCOINT, FMINOX*FMTROK*FMTRER) f ALLOW NORMAL INTERRUPTS 
M88TAT |« OONIOf NOW THAT KNOW IS DOUBLE 

MBUS (MAOR, FCLEAR, FKPNTR5 | CLEARING PNTR INTERRUPT 

M9US MA0R|FC0INT#FMINDX*FMTROK+FMTRER CJF|BR WASTED) 



8AL MBSTATiOONIO 

H8U8 MADR,FCLEAR,FKPNTR 



RETURN (SRVBSN) 
iRAX SRVfiSN 

END 08LRED» 



CONTINUE AS NORMAL 



OATAPOINT CONFIDENTIAL INFORMATION ^ SEE PAGE 1 
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FLEX/TXT 



MICRO»PROCESSDR FLEXIBLE DISKETTE CODE - HJS - 78JUL20 U M4 
CHECK HEADER FOR CORRECT FORMAT (AND ON CORRECT TRACK - SECTOR) 



185^ 

187. 
188. 
189'. 
190'. 
191; 
1921 
193, 
194. 

195* 
1961 
197. 



W04107L 



198. 



199; 



201, 

202, 
283. 
204* 
205; 



2«!7; 



208; 

209, 
210^ 

tm # h m 

212, 
213; 



004107L 0l!30a0iPI PtlilPHtPfl 

!?04iiPL iip*i0piii ^immu 



0041UL 
004112L 
e041l3L 

004U5L 
004U6L 
0PI4U7L 
0f?i412!?)L 
09'4121L 
004122L 
S04123L 
004124L 
004125L 
004126L 
004127L 
0»413?»L 
i04131L 
004132L 
004133L 
004134L 
08»4135L 
0?4136L 
i!^4l37L 
00414{^L 



00010001 
01010«11 

110011051 

?iiaii!?iin 

01?!10SI01 
00110111 
05)110111 

SS001f?ISH 

0i0iiiU 

110P!ll^(^ 
0(^110111 

e!i0i0f5ii 

0011011! 
00110111 
01010001 
00000111 
00010001 
01010011 
11001100 
00110111 
01010001 
00110U1 
00110111 



004140L 
00414a 
004142L 
004143L 
004144L 
004145L 
004146L 
004147L 



00010001 
01010011 
11001100 
00110111 
01010001 
11001111 
11011111 
00000111 



11110011 

01010000 
10110100 
00100113 
00000001 
00100111 
00101001 
11110011 
10110000 
10101101 
00100110 
00010001 
001001U 
00101001 
10000110 
11110101 
11110011 
00110000 
10100100 
00100110 
01111111 
00100111 
00101001 



11110011 
00010000 
10011101 
00100110 
10011000 
00101101 
01000010 
11111000 



* 

HORCHK 

, 17,30 OR 24;95 IF WORST BAD CASE ♦** CHANGED AGAIN *** 

, BEGIN 

, IF FITROK lAKODE 

, THEN EXIT (HOREAD)I 

TSTIT XR, FITROK 

BRA HOREAD,FZ 
, M8US CMADRi FCOTUP, 
, M8U3 tMADR» FCOINT, 
, M88TAT J« HORCHKU 
, MBUS CMAOR, FCLEAR, 



FPTRKH>1)? 
FMIN0X*FMPNTR)| 

FKMAST+FKLOFF)! 



ONLV TRANSFER OK ALLOWED INT 



SET MICRO-POINTER 
POINTERS NOT EQUAL ONLY 

DONE » I/O FINISHED 



M8US 



MA0R,FC0TUP,FPTRKH>1 



MBUS MAOR,FCOINT,FMINOX+FMPNTR 



8AL HBSTAT,HDRCHK1 

MBUS MAOR, FCLEAR, FKMAST+FKLOFF 



HORCOM 

. 11,95 OR ♦♦♦ CHANGED 
, BINOEL (HOREAD, 
, CRCGENX (TEMP) I 
, M08K8 ia TEMP? 

M8USA«I MAORfFClNDT 



AGAIN **♦ 20,10 
TEMP) I 



(COMMON HEADER GET DATA BYTE ROUTINE) 

IF ERROR 

COMPRESS DATA BYTE 

00 CRC FOR IT -#• DELAYED 

IT IS TRACK OR SECTOR NUMBER 

(PRE^SELECT BUS ADDR»FUNCTION) 



8RC 



8INDEL,f$+3 



BRA HOREAD 

LORT MOSKS 
IF 80CLK <> MBIN CMADR, 
THEN EXIT CHDREAD); 
IF SOCLK MBIN CMAOR, 
THEN EXIT (HOREAD) I 



FCINOT) 
FCINDT) 



ZERO FOLLOWS TRACK/SECTOR « 



DATAPOINT CONFIOENTIAL INFORMATION • SEC PAGE 1 



PAGE H 



214: 

215. 
216; 
217. 



218. 
219. 



229, 

222. 
223. 

224^ 
225^ 
226. 
227^ 
228. 



229y 
230. 



23i: 

232^ 

233. 

234'. 



235*. 
236'. 

2371 
238, 
239; 

248. 
2^9'. 

2501 
251. 

2S2l 

253; 



FUEX/TXT 



MICR0»PR0CeS80R FLEXIBLE DISKETTE CODE » HJS * 78JUL20 11144 
CHECK HEADER FOR CORRECT FORMAT (AND ON CORRECT TRACK f- SECTOR) 



(30415iL 

0«4152L 
06i4l53L 
mAiS^L 

i«4i5eL 

004157L 
ff4160L 
a04l61L 
SS«4162L 
e«?»4163L 



004164L 

004165L 

004166L 

>004167L 

>00417P»L 



i04l7lL 
004172L 
004173L 
iS4}74L 
!?04175L 
00417fiL 
0«4177L 
8l042e)!?L 
0B4201L 
004209L 
05?4?e!3L 
0i4204L 



t50ll«?iUl 
01010001 
11801100 

00110000 

11010010 
0101000! 
11001111 

00110111 

01010001 
110011091 
0Wll00g0 
11010010 



00110001 
01010101 
10000011 
01011001 
11001111 



11000100 
11000111 
01010001 
00110111 
01010001 

00U0111 

00110111 
00010001 
00000111 
11000100 

U000U1 

00110000 



00101001 
10101010 
10010101 
00010101 
01000010 
100l00Pt0 

01010010 

001010511 
10101010 

10001110 

00010101 
01000010 



00110000 
10111101 
00000101 

llUUll 
llllUU 



10000110 
U101101 
01100H1 

11000000 
11101111 

U100000 
01000111 
11111008 
11111001 
01111101 
U101101 
00110U0 



004205U 11010010 01000010 



004206L 
004207L 
004210L 
00421 IL 



01010001 
00000111 
01010001 
11001111 



01110101 
11U0101 
1001 IIU 
01001101 



CRCGEN C0)» 
ST§ MIFSTB 



DO CRC FOR ZERO • DELAYED 



LOTI 
MBTIN 

SRC 



8QCIK 
XR 

HDREAO,FZ 
CRCSENX 



STB 
LOTI 
MBTIN XR 



MIFSTB 
SPCLK 



(DELAYED CRCSENX (TEMP) • NEEDED HERE) 
CFOR TIMING DELAY BETWEEN MIFST8»S3 



BRA HDREAD,FZ (ERROR EXIT, BAD DATA) 

IF 8RVREQ .AND, .NOT', (SCM8US '.OR, SCHUMS) 
THEN RETURN (SRVDO) 
ELSE EXIT (HBSTATJl 

TSTIP N0,-l»SCM8US^8CHUMSiSRVRE0#TW (IGNORE 100 MICRO*SEC) 



HDRCHKl 



BRR 
BRAX 



IF8 
MWAIT 



MB8TAT,TZ 
SRVOO 



APF 

,MEMPFDS 



(DON'T EXIT IF NO SERVICE TO 00) 
(GO RIGHT TO THE SERVICE) 



DLOPI MARO,SVMTRAK,,SMR 

LORR HDSKTiMOSKS 

MWAIT ,MEMPFOS 

TSTPT XR,MDR 
XIF 

IFC APF 
XIF 

BRA HDREADiFZ 
M8STAT »■ HORCRC 

BAL MBSTAT, HORCRC 

BRC CRCGEN,, HORCOM 



(READ THE TRACK NUMBER IN MEMORY) 



(FROM DELAY OF ZERO CRC) 

(AND USE COMMON CODE TO GET SECTOR ») 



DATAPOINT CONFIOgNTIAL INFORHATION f SEE PAGE I 
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254' 
2S5; 
256. 

257: 



FLEX/TXT 



MICRO'-PROCESSOR FLEXIBLE DISKETTE CQ0E • HJS * 78JUL20 11144 
CHECK HEAOER FOP CORRECT FORMAT tANO ON CORRECT TRACK - SECTOR) 



258, 
259' 
262, 
263, 
264. 
265; 
266, 
267, 
268^ 
269*, 
270*. 



271; 



272*. 



273i 
Z74f 
275, 
2761 
2771 
278. 

279'. 

2801 

2«i: 

282. 

2831 

284 

285; 

286. 

287*. 

2881 
289, 
291. 
292, 
293, 
294, 
295. 



004212L 110001(30 01110101 



0«4213L 
004814L 
004215L 
0B4216L 
004217L 
0i4220L 



004221L 
004222L 
004223L 
004224L 
004225L 
00422fiL 
004227L 
004230L 
004231L 
004232L 
004233L 



004234L 
004235L 
004236L 
004237L 
004240L 



004S41L 
a04242L 
i04243L 
004244L 



004245L 
004246L 
004247L 
00425iL 



U000U1 

01010001 

00U01U 

01010001 

00110111 

00110111 



00010001 
01010011 
11001100 
00U0111 
01010001 
110«51111 
01010001 
11001111 
11011111 
00010000 
11010010 



01010001 
11001111 

U 1 1 1 1 1 

00010000 
11010010 



11000100 

U0001H 

00110001 
00010000 



11000011 
000101U 
11010010 
00010001 



1110U01 

01100U0 
11000000 
11101111 
11100000 
01000111 



11110011 
00010000 
011011510 
00100110 
01101000 

0100Ui«l 

01100101 
00101101 
01000010 
11000110 
01000010 



01100000 
00101101 
01000010 

11080U1 

01000010 



01011110 
11101101 
00110110 
11001000 



01010100 
11000010 
01000010 
11110100 



HDRCRC 



IFS APF 
MWAIT ,MEMPFDS 

FILDPI MAR0,SVMSECT,,8HR 



(REAO THE TRACK NUHBCR EARLY) 



XIF 
IFC 
XIF 



APF 



16,90 TO HOROK NORMAL (♦ 0,40 IF READ SECTOR ZERO) 

♦ ADD TOTALS FOR EACH INDEPENDENT ROUTINE 
24,95 IF WRONG SECTOR NUMBER 
25,25 IF NOT SECTOR ZERO 
24,45 IF WORST CASE BAD DATA 

IF MCRCH <> 8IN0EL CHOREAO. TEMP) CHECK CRC MSB 
THEN EXIT (HOREAO)I 
MBU8AW MA0R,FCINDT 



BRC CRCGEN 

BRC 8lNDEL»iS*3 



(HERE WHERE TIMING DELAY NEEDED) 



(ERROR EXIT, BAD DATA) 



BRA HOREAO 

TSTRT XR, MCRCH 

BRA HDREAO,FZ (ERROR EXIT, BAD DATA) 

IF MCRCL <> eiNOEL (HDREAO, TEMP) CHECK CRC L88 
THEN EXIT CHOREAO) » 

BRC BIN0EL,#$*3 

BRA HOREAD (ERROR EXIT, BAD DATA) 

TSTRT XR, MCRCL 

BRA HDREAO, FZ (ERROR EXIT, BAD DATA) 

IF (MDSKS <> MSECT) » SECTOR NUMBER CORRECT?? 

(MSECT *> OR NOT FFREAD IN MBITS) NO, WILL ANY 00 • ON RgAOS 



THEN EXIT (HDREAO) I 

IFS APF 

MWAIT ,MEMPFOS 

TSTRP XR,M0SK8,MPR 

XIF 

IFC APF 

XIF 

BRA HOROKX,TZ 

TSTRT FT,0 

BRA HDREAD,FZ 

tSTIR ,FFRM8K, MBITS 



CAN'T OPERATE ON THAT SECTOR 



(RESET ZERO FLAG ON MSECT VALUE) 
(010 NOT ASK FOR SECTOR ZERO) 



OATAPOINT CONFIOENTIAL INFORMATION - SEE PAGE 1 
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FLEX/TXT 



MlCROwPSOCESSOR FLEXIBLE DISKETTE COOE - HJ8 • 78JUL28 UI44 
CHECK HEAOEP FOR CORRECT FORMAT (AND ON CORRECT TRACK - SECTOR) 



2961 
297. 



298. 
299. 

3(B0l 



0i425iL 0i005it?i mi^mm 

0!?425?L ii0i0?iio piimmiB 

0a4253L 01011001 11110101 

004254U 11001111 UlllUi 



HOROKX 



8RA 
BRAX 



HOREAO,FZ 
HOROK 



(OR WAS NOT READ OPERATION) 



IT'S OK, USE THAT SECTOR 
EXIT (HOROK) 
END HORCHKI 



DATAPOINT CONFIOENTIAL INFORMATION • SEC PAGE I 
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3«4, 
3051 
3»6' 
3i7j 
3i58, 
309. 
3101 
3U. 



312. 
313. 
314. 
3151 
316j 
317^ 
318. 
3191 
320j 

Of J a 

322, 

323^ 

324, 

325. 

326. 

3271 

328j 

329^ 

330^ 

331. 

332. 

3331 

334; 

3351 

336, 

337, 

3381 

339, 

3401 

3411 

342, 

343, 

344 

345, 

346, 

3471 

348, 

349, 

350, 

3511 

352. 



FLEX/TXT 



004255L 



004255L 
004256L 
09i4257t 
00426!3t 
004261L 

0^42621 



0U01111 
i00l0f01 
0111000^ 
00000 U J 
11001 111 



11110000 
11110110 
U110801 
1 U 1 U 
010010H 



MICRO-PROCESSOP FLEXIBUE DISKETTE CODE » HJS • 78JU1.20 UI44 
COMMON SUBROUTINES - CRC GENERATION, BIT DELETED S BIT INSERTION 



CRCGENX 

** 3,7 •♦ 

, BEGIN 

, MCRCH i« MCRCH ,XOR, TeMP2» 

, EXIT CCRC6EN5 

. END CRCGENXi 

9AS UINK 

OORRR MCRCH, XR, TEMPI, MCRCH 



BRA CRCGENY 
* 
CRCGEN 

GENERATE 'SOLC' TYPE CRC 
♦ 3,3 ** 

BEGIN 

TEMP2 IB MCRCH ,XOR, CMCRCH<4 .AND. 017) > 

MCRCH la MCRCtr 

MCRCL »■ TEMP2f 

TEMP2 »« MCRCl.<4» 

MCRCH IB MCRCH ,XOR, CTEMP2 .AND. 0360) | 

TEMP2 i« TEMP2<1| 

MCRCH t« MCRCH ,XOR, tTEMP2 ^ANO, 037)1 

MCRCL ia MCRCL ,XOR. CTEMP2 ,ANO, 0340) | 

RETURN 

ENTER! MCRCH IS MCRCH ,XOR. DATA 

MCRCL IS MCRCL 

EXIT! MCRCH ft L, IS THE NEW CRC 

T-REG IS MCRCL 



RESULT BITS ARE! (MADE FROM XOR OF COLUMNS) 



BIT 15 14 i3 12 U 10 
IS 



a 



C7 C6 C5 C4 

C15 C14 C13 C12 

07 06 05 D4 



C3 C2 CI C0 



6 



C15 C14 C13 C12 Cll C10 
07 06 05 04 03 02 



Cll C10 
03 02 



C9 C8 
01 00 

C15 C14 C13 C12 Cll C10 
07 06 05 04 03 02 



C9 C8 

01 00 

C15 C14 C13 C12 

07 06 05 04 



C9 
01 



C8 

00 



C15 C14 C13 C12 
07 06 05 04 



OR IN SHORTER FORMi 
C7 C6 C5 C4 C3 
M N P 

I J 
WHERE I.,P ISJ 

C15 C14 C13 C12 Cll C10 
07 06 05 04 03 02 



C2 CI C0 



M 



J 



C9 
01 



K 
P 

C8 
00 



DATAPOINT CONFingNTlAU INFORMATION m SEf PAGE 1 
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3S3l 

355, 
3S6; 
357. 
358, 



FtEX/TXT 



MICRO-'PROCESSOR FLEXIBLE DISKETTE CODE -^ HJS • 78JUt20 11144 
COMMON SUBROUTINES m CRC GENERATION, BIT DELETED & BIT INSERTION 



f 



359; 

360 

360 

360; 

3601 

362; 

363*. 

364*. 

3651 
366. 
366* 
366, 
366j 
367, 
368, 
369. 

370'. 



37i' 
372. 

373'. 

374*. 

375* 
376. 



0ej4a62L 

004263L 
?!?)4264L 

0e'4264L 
0ei426SL 
§042661 
004267U 
00427^1. 
00427a 
004278L 
f?l4273L. 
004274L 
0PI4275L 
004276U 

0i4277L 
0i43^iL 
0«4301U 
(^i43?!2L 
(804303L. 
004304t 
004305L 
004306L 
004307U 
004310L 
0043UU 
004312L 
004313L 
004314L 
004315L 
0043161 
004317L 
004320L 
0043211 



01101111 

00010001 



00010111 
00010111 
00010111 
00010111 
01010101 
00010000 
0U01111 
00010001 
00000111 
01110001 
00000111 

00010111 
00010111 
00010111 
00010111 
01101111 
01010101 
00010000 
00000U1 
01110001 
000I0IU 
01101111 
01010101 
00010000 
000001U 
01110001 
01010101 
00010000 
00000111 
11101111 



11110000 
U110110 



10100010 
10100010 
10100010 
10100010 
00001111 
11110110 

11110010 

11110111 
11110110 
11110010 
Ullilll 

10100010 
10100010 
10100010 
10100010 

11110010 
11110000 
11110110 
11110110 
11110010 

10100010 

11110010 
0001U11 

11U0U0 

11110110 

11110010 
11100000 
10110111 

11U01U 

00000000 



CRCGENY 



CIS C14 C13 C12 
07 06 D5 04 



BAS tiNK 

LOTR MCRCH 

RPT 4 

SHIFT SL 

SHIFT SI. 

SHIFT SL 

SHIFT SL 

OOTI ,ND#017 

OORR TEMP2iXR,MCRCH 

LORR MCRCH.HCRCL 

LDRR MCRCL»TEMP2 

RPT 4 

SHIFT SL 

SHIFT SL 

SHIFT SL 

SHIFT SL 

LORT TFMP2 

OOTI , NO, 0360 

OQRR MCRCHiXR^MCRCH 



HAVE I 


J 


K 


L 


M 


N 





P 


HAVE C7 


6 


5 


4 


3 


2 


1 






SAVE 
SET 



H 
M 



N 

H 








P 
P 



HAVE 7M 6N 50 4P 
OORRR TEMP2,FT,0,TEMP2,CC+8L HAVE N P I 



I 
3 
J 



J 
2 

K 



K 
1 

L 



OOTI ,NDia37 

OORR MCRCMiXRjMCRCH 

OOTIR ,NO,0340,TeMP8 

OORR MCRCL,XR,MCRCL,iCC 

BRR LINK 
ENO CRCGENi 



GET I vT K L H 

HAVE 7M «N 50 4PI 3J 2K IL 0M 

GET NOP 

HAVE IN JO KP L *^ N P 



DATAPOINT CONFIDENTIAL INFORHATtON - SEf PAGE I 



PARE tS 


F 


377* 




378, 




379, 


004388L 


380, 




381'. 




382' 




383, 




384, 




385, 




386, 




387, 




388, 




389, 




390, 




39ll 




392, 




393, 




394, 
395, 






396, 




3971 




398, 
3991 






400, 




401, 


0043281. 


402, 


004323L 


403, 


0043241 


404, 


0043251. 


405, 


004326L 


406, 


004327L 


407, 


004330L 


408, 
409, 


004331L 


004338L 


410, 
411, 


004333L 


a04334L 


412, 


004335L 


413, 


004336L 


414, 

4151 


004337L 


00434«L 


416. 




4171 


004341L 


417. 


004342L 


4181 
4191 

420, 


004343L 


004344L 




48i; 


004345L 


422, 


00434SU 


483, 

484^ 
425, 

486, 


004347L 


00435PIL 


004351L 


004358U 


427; 


004353L 



FUEX/TXT 



MlCPDiPROCESSOR FLEXIBLE DISKETTE CODE • HJ8 - 78JUL20 UJ44 
COMMON SUBROUTINES -» CRC GENERATION, BIT DELETED & BIT INSERTION 



00U0111 
0U01U1 

0101000} 

1100U5I0 
00110000 
01000101 

U000010 

01010010 
01010101 
01010010 
01010101 
01010010 
0101PI101 
01010010 
01010101 

11001111 
110011U 
00110111 
M 1 I I U 1 

01010W0! 
11001100 
00110000 
01000101 
11000010 

01010010 
01010101 



0fl01001 
10110000 
10101010 
00101010 
00010101 
10101010 
0«!000U0 
01010101 
10101010 
00181010 
11010100 

00010100 

11101000 
mmiBm 
11110000 

00011101 
0001U00 
00101001 
10110001 

10101010 
00011001 
00010101 
10101010 
00000110 
01010101 
10101010 



* 
BINDEL 



DN 



♦ 4,8 ** 1.50 IF ERROR 
BINDEL (ERRAORf BYTE) J 
BEGIN 

T i« M9IN fHAOR, FCINOT) 
IF 30CLK IN T 
THEN RETURN (ERRAOR) I 
TEMPI S> (T 16, 4, 2, 01 
T J« MRIN (MAORi FCINOT) 
IF SOCLK IN T 
THEN RETURN CERRAORSf 
TEMPI i" TEMPI ,0R, C0, i, 0, 
MCRCH 18 HCRCH ,XOR, TEMPI? 



ROUTINE TO INPUT BVTE » CLOCK DELETE IT 
FIRST BYTE. 3,70 IF ERROR ON SECOND 



,XOR, SOCLKy 

0# 0# 0r 0); 
,XOR, SOCLKf 



i, T C6, 



4, 2, 01)1 

FOR CRCGENERATOR 



INPUTS TWO BYTES FROM THE DEVICE LAST ACCESSED (ASSUMING COMMAND » AODR OK) 

ODD BITS MUST ALL BE ONE'Si AND EVEN BITS ARE SQUEEZED TOGETHER, 

THE FIRST BYTE INPUT DEFINES THE HIGH ORDER HEX DIGIT, AND THE SECOND BYTE 

DEFINES THE LON ORDER HEX DIGIT. THEY ARE COMBINED AND RETURNED IN T»R£G, 

IF AN ERROR IS SEEN, THE ROUTINE RETURNS TO ONE INSTRUCTION 'BEFORE' 

THE ONE SPECIFIED IN THE RETURN ADDRESS GIVEN IN THE T*REG WHEN CALLED, 

TO DO THE MSB 

10 10 10 10 

0D0D0D0O 



D0D0D0O0 
D««<w<<p0 
DD0D0D0i 
DD«»<»00 
DDD0D000 
DOO««'000 
OOOD0000 THE WHOLE NIBBLE IS UP 

*♦ DELAY FOR 2,0 -SEC AT LEAST ** 

♦♦ DELAY FOR 2,0 -SEC AT LEAST ** 
♦EARLY CA LITTLE)* 

•SECOND HALF CLSB)* 

10 10 10 10 



MBUS8 




BAS 


LINK,CC 


LDTI 


SOCLK 


MBWAIT 




OOTP 


,XR,MIFIN 


TSTIT 


»SOCLK 


BRA 


BINDER, FZ 


DOTI 


,ACf0125 


OOTI 


, NO, 0252 


DOTI 


iAC#052 


DOTI 


,ND,0324 


DOTI 


, AC. 084 


OOTI 


, NO. 0350 


OOTI 


, AC. 010 


DOTI 


, NO, 0360 


RPT 


2 


BRA 


S + 1 


BRA 


S + 1 


MBUaS 




LORT 


TEMPI, ,CC 


LOTI 


SOCLK 


MBWAIT 




OOTP 


.XR.MIFIN 


TSTIT 


.SOCLK 


BRA 


BINDER. FZ 


DOTI 


, AC. 0125 


DOTI 


.NO, 0252 



0D0O0O0D 



D0D0D0D0 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE I 
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4g8* 
489, 
43», 
43i. 
438, 

433y 

434, 
4351 
435, 
435, 
435J 
436. 

437^ 

438, 
4391 



44^, 

44U 
442' 

443. 



FLEX/TXT 



MICPO-PROCESSOR FLEXIBLE DISKETTE CODE * HJS « 
COMMON SUBROUTINES • CRC GENERATION, BIT DELETED 



g!(?4354L 
0e»4355L 
004356L 
0043S7L 
0O4360L 
0?»4361L 

004368L 
af4363L 
0P4364L 
0i4365L 
0?«4366L 
0^4367L 
pi?l437e!L 

09I4371L 
0a4372L 
004373L 



Pi«^4374L 
0f4375L 
004376L 
iP»4377L 



01010101 
0iai§f 10 

01010101 

01010010 

01010101 

000101111 
00010U1 
00010U1 
00010111 
01U0011 
01101111 
U10U11 

01110001 
01101110 
11101111 



1 11 11 1 1 1 
1 1 1 1 1 1 U 
llUUll 
I U 1 1 11 1 



00101010 
11010100 
00010100 

11101000 

00001000 
11110000 

10100010 
10100010 
10100010 
10100010 
11110001 
11110001 
00000000 

1 1110000 

01U0000 
6»0000000 



mum 
mum 
mum 
mum 



BINDER 



DOTI ,ACi052 

DOTI ,NDi03a4 

DOTI ,AC»024 

DOTI ,ND,03S0 

DOTI ,AC#010 

DOTI ,NO»0360 

RPT 4 

SHIFT 8L 

SHIFT SL 

SHIFT SL 

SHIFT SL 

DORR TEMPUORfTEMPi 

BRR LINK 

INCR LINK, LINK 



BRR LINK 
, END 8IN0EL» 

* 

TA8PAGE FLEXL 



D < 



78JULS0 11144 
BIT INSERTION 

• 






D 











D 








D 


D 


< 


m 


< 


9 








D 


D 


D 

















D 


D 


D 


< 


m 











D 


D 





















THE WHOLE NISBLE IS UP 



MOVE IT OOWNJ 

LEFT 4 FASTER THAN RIGHT 5 

LEFT 4 FASTER THAN RIGHT 5 

LEFT 4 FASTER THAN RIGHT 5 

LEFT 4 FASTER THAN RIGHT 5 
AND FINALLV COMBINE THEM 



TAKE THE ERROR EXIT (BEFORE NORHALl) 



OATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE I 



PASE 17 


FLEX/TXT 


444^ 




445, 
4461 




00440?!t 


447, 




448. 




449 

450^ 






45U 




4521 




453, 




454, 




455, 
456, 






457. 





458, 

459, 

460 

461, 

462j 

463, 

464, 

465. 

466' 

467, 

4681 

468. 

468' 

468, 

469; 

47i: 
472, 
473, 
4741 
475, 
476. 
477'. 

478*, 
479. 

4801 
481, 
482j 
483, 
484, 
485: 
488, 
4871 
486, 
489, 
489, 
489. 



B(?i44il?IL 01101111 11U«0SI0 

004401L s5iU0i»0t niim^i 



p!Pl44agL 
004403L 
004404t 
004405L 
0044061 
004407L 
0<»4410L 
0044UI. 

004412L 
004413U 

004414L 
004415L 
0044161 
004417L 
004420L 
004421L 
004482L 
004423L 
004424L 
004425t 
004426U 
004427L 
0044301 
004431L 

00443SL 
0044331 
004434L 



0(?'010111 
00010111 
00010111 
00010111 

01010101 
01010010 
01010101 
01010010 
01010101 
il0l0P'10 
01010011 
110U100 
00110111 
00U0111 
01110001 
01010101 
01010010 
01010101 
01010010 
01010101 
01010010 
01010011 
11011100 
00U0111 

iieuiii 

I 1 U 1 1 1 
11011111 



10100010 
10100010 
10100010 
10100010 
00001111 
00001000 
00010111 
00010100 
00101011 
00101010 
10101010 
UU0010 
00100111 
00101001 

11110001 
000011U 
00001000 
00010111 
00010100 
00101011 
00101010 

10101010 
11100111 
00100UI 

U1001Pi 
1U0B011 
11100010 



MTCRO-PROCESSnf? FLEXIBLE DISKETTE COOE • HJS m 78JUL.S0 U»44 

COMMON SUBROUTINES " CRC GENERATION, BIT OEUETEO & BIT INSERTION 

* 

80TINS 

, ROUTINE TO OUTPUT BYTE, CLOCK INSERTING 

** 4,1 ** 

BOTINS CSYTE)» 

BEGIN 

T }i (1, BYTE 17), 1, BYTE C6I , 1, BYTE t51 , I, BYTE C43 ) I 

MBUS CMAOR, FCOUTC, T) J 

T M (1, BYTE t31 , 1, BYTE t2I , 1, BYTE ID, i, BYTE £0351 

MBUS CMAOR, FCOUTC» T)| 

MCRCH IB MCRCH .XOR, BYTE FOR CRCSENERATOR 

INPUTS A BYTE FROM TEMPI AND OUTPUTS TNO BYTES 

TO THE OiVICe LAST ACCESSED ON THE HICRO-BUSS CASSUMINg AODR, & COMMAND OK) 

THE MOST SIGNIFICANT INPUT NIBBLE BfCOMES THE FIRST BYTE AND THE LEAST 

SIGNIFICANT NIBBLE THE SECOND BYTE OUTPUT. 

EACH NIBBLE GETS CLOCK BITS INSERTED BEFORE EACH BIT OF THE NI8SLF 

TO SPREAD THE 4 BITS OUT TO FILL A BYTE, 



BAS LINK 

LOTR TEMPI 

RPT 4 

SHIFT SL 

SHIFT St 

SHIFT SL 

SHIFT SL 

OOTI ,ND#017 

DOTI , AC, 010 

OOTI , MO. 027 

OOTI , AC. 024 

OOTI , NO, 053 

OOTI , AC, 052 

OOTI ,0R,80CLK 

MBWAIT 

STB MIFOATjMIFSTB 

LOTR TEMPI 

OOTI , NO. 017 

OOTI , AC. 010 

OOTI , NO, 027 

OOTI , AC. 024 

OOTI , NO, 053 

OOTI , AC, 052 

OOTI ,OR,SOCLK 
MBWAIT 

STB MIFDAT 

RPT 5 

BRA $+1 

BRA S+l 

BRA f*i 



*♦ MSB *♦ (CLEARS CARRY ALSO) 









D 


< w 

















< « < 


m 


D 











< • « • 


< 


• 


10 10 1 





1 


♦ *OUTPUT MS*«NIB 


♦* LSB *♦ 















< - 

















< •• < 


m 














< IP < • 


< 


f 


I 1 1 





1 



♦* OUTPUT LS-NIBBLE ♦* 

♦* DELAY FOR 2,0 •SEC AT LEAST *♦ 

♦* DELAY FOR 2.0 •SEC AT LEAST ♦* 

** DELAY FOR 2,0 i-SEC AT LEAST *♦ 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 



AGE 18 


489' 


489j 


490, 


49lJ 


492. 


493. 



FLEX/TXT 



004435L 
004436L 
004437L 
004440L 



iieiiuu 

11011111 

05^110111 

iiiaiui 



mmmx 

1115'?I08I0 
P«010l0?ll 



MICRO^PROCESSOR FLgiflBUE DISKETTE CODE »• HJS^ 7BJUim 11144 

COMMON SUBROUTINES * CRC GENERATION, BIT DELETED & BIT INSERTION 

*♦ DELAY FOR 2,0 -SEC AT LEAST ♦♦ 

*♦ DELAY FOR 2,0 -SEC AT LEAST ♦* 



BRA 


$♦1 


BRA 


i*l 


M8USS 




SRR 


LINK 


END BOTINSI 
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FLE5</TXT 



DATAPOINT CONFIOENTIAU INFORHATION * SEE PAGE 1 

MICRO-PROCESSOR FLEXIBLE DISKETTE CODE • HJS • 
PERFORM BUFFER - PROCESSOR OPERATIONS 



784UL20 11144 



496' 
4971 
498^ 
499. 

500'. 
50ll 
5i2. 
5031 
504, 
5515. 
506' 
507. 

5B8l 

509'. 

510* 
511^ 
512. 
513* 
5231 
524, 
525, 
526, 
527^ 

Ok y « 



530, 
53i: 
532, 
533, 
534, 
535, 
536, 
537J 
538, 
539, 
540; 

541*. 

5421 
543J 

P <f ^ _ 



0{44441L 



00444iL 
0i4442L 
004443L 
004444L 
004445L 
004446L 
004447L 
004450L 



0a445lL 
004452L 
004453L 
ii4454L 
004455L 
if4456L 
004457L 

004460L 



004461L 
004462L 
004463L 
0ffl4464L 
004469L 
004466L 
i04467L 
004470L 



00110001 
00110111 
00110111 
00010000 
00000111 
01010001 
11001111 
11001110 



01010011 
00110111 
01010001 
00110111 
00110111 
11011111 
11001110 

11001110 



01010011 
00110111 

00U0001 

00110111 
01101111 
00110111 
01010001 
11001111 



00U0110 
00001100 
01000111 
11110110 
11110110 
10011000 
01001101 
llUllll 



10100000 
00100110 
10101010 

00100111 

00101001 

10011000 

1 1 1 1 1 1 1 1 

UUllU 



1010B000 
00100110 
00110110 
00100111 
11110001 
00101001 
10011010 

01010010 



F0FCN8 

*♦ TIMINGS GIVEN BELOW ARE TO LABEL 'FOF' WITH WHATEVER ROUTINE IS USEO 



IPS APF 
♦ f!RC» CRCGEN f (MAR)5? 
, MAR :» MAR + If 

, EXIT (FDF)I 

♦* 4,25 ** 



ONLY CRC GENERATE 



LOTP 
ST8 

OORR 

BRC 

NOOP 
XIF 

IPC 
XIF 



MOR 
IMAR,SMR 

HCRCH,XR|MCRCH 

CRCGEN,, FOF 



APF 



WPlt M8US (MAOR, PCOUTC, 80CLK) | 
EXIT (FOF)I 



PREAMBLE INITIALHE 



** 0,85 ♦* 

MBUSA 

LDPI 

M8USS 
BRA 
NOOP 
NOOP 



.FCOUTC 
MIF0AT,80CLK 

FOF 



tPAO TO 8 WORDS) 



OTOS MBUS fMADR, FCOUTC, TEMP !■ (MDRn? OUTPUT DOUBLE 
CRC6ENX (TEMP) I 
MAR }■ MAR * 1 
EXIT (FDF)l 

♦ 5,1 ♦* 

MBUSA .FCOUTC 

MBUSP HDR 

LORT TEMPI 

MgUSS 

BRC CRCSENX,,FOFIS 



OATAPOINT CONFIOENTIAU INFORMATION » SEE PAGE 1 
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545: 

546y 

547J 

548 

549y 

S50, 

551. 



FLEX/TXT 



552*. 
5531 



554. 



OOP* 

5S6« 

557. 

5581 
559^ 
560. 



581; 



562. 
563^ 
564^ 
565. 
5661 
567, 
568, 
569. 

5701 

57i; 
572J 

573. 

5741 



0044711, 
0844721 
004473L 
004474U 
0044751. 
004476L 
004477L 
0045001 



^345011, 
004502L 
0045031 
004504L 
004505L 
0045061. 
004507L 
004510U 



0045UU 
004512L 
004513U 
004514L 
0045t5L 
i045l6L 
004516L 
004517L 
0045201. 



01010011 
00110111 
00110001 
01101111 
01010001 

11011111 
01010001 
11001111 



01010011 
00110111 

00110111 

11001110 
11011100 
00110001 
01101111 
11011111 



01010011 
00110111 
01010001 

11001111 

11011111 

01010001 

11001111 
11001110 



10100000 
00100110 

11110001 

11000000 

llllllU 

10011010 
01010010 



00010000 
00100110 
00101001 
1 1 1 1 1 1 1 I 
10111010 

00010101 
11110001 
10110001 



00010000 
00100110 
10110001 
00101101 
01001111 

10011000 
01010010 
lllUlll 



MICROfPPOCESSOR FLEXIBLE DISKETTE CODE - HJ8 m 
PERFORM BUFFER • PROCESSOR OPERATIONS 



, OTSJ 80TINS CTEMP is (MDR)i| 
, CRCGENX (TEMP) I 

, MAR I« MAR ♦ 1 

, EXIT fPOFJl 

** 9,20 *♦ 

♦FCOUTC 



78JUL20 11144 



OUTPUT SINGLE 



M8USA 
LORP 
BRC 
8RC 



TGMPliMOR 
BOTINS 
CRCGENX, ,FDFIS 



VRD» TEMP ti MBIN (MADR, FCINOTJ J 
CRCGENX (TEMP) I 
EXIT (FOF)I 



VERIFY DOUBLE 



♦* 5,45 ** 



MBUSAS ,FCINDT 



MBIN NOOP 



LORT 
BRA 



TEMPI 
FDFINC 



. VRSI 8IN0EL (FORDTA, TEMP) | 
, CRCGENX (TEMP) I 

EXIT (FOF)I 
** 9,35 ** 

iFClNDT 



VERIFY SINGLE 



FDFINC 



MBUSA 

BRC 

BRA 

BRC 

NOOP 



eiN0EL,,S+3 
FDRDTA 
CRCGENX,, FDF 
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S75l 
576. 



577. 

578 

579 

5055 

581. 



5«2*. 



5831 
584: 
585j 
586, 
588, 
589. 
590. 
591. 
592^ 
593, 
594, 
5951 
596. 

5971 

598* 
599, 

600. 
601'. 

602*. 

603* 
604, 
605, 
606, 
607. 

608'. 



FLEX/TXT 



0045211 
0945221. 

004523L 
0i4S24L 
004525L 
004526L 
004527L 
0045301 



0i453lL 

004531L 
004532L 
004533U 
004534L 
0045351 
004536L 
004536U 
004537U 
00454iU 
004541L 
004542L 
004543L 
0045441 

004545L 
00454SL 
004546L 



01010011 
00U0111 
00110111 
11001110 
11011100 

00110001 

01101111 
11011111 



01010011 
00110111 

01010001 
11001111 
11011111 

00110111 
01010001 
11001111 
11010100 
11010111 
00110111 
11011111 



00110111 
00110111 



{!001S!I000 
00100110 
00101001 
IIIUIU 
10101010 
00010101 
11110001 

10100001 



00010000 
00100110 
10100001 
00101101 
01001111 

00100001 

10011110 

01010010 

1001U10 

10000110 

00001100 
J0011000 



00001100 
01000111 



OATAPOINT CONFineNTlAL INFORMATION • SEE PAGE 1 

MICRO-PROCESSOR FLEXIBLE DISKETTE CODE •• HJS • 
PERFORM BUFFER - PROCESSOR OPERATIONS 



, INOI CMAR) I« TEMP IB M0IN tMAOR, FCINOT); 
, CRC6ENX (TEMP) I 

, MAR !■ MAR ♦ U 

EXIT CFOFJl 
*♦ 6,15 ** 

M8USAS ,FCINOT 



78JUL20 11J44 



INPUT DOUBLE 



M8IN 



LORT 
BRA 

IFNE 
XIF 



NfOOP 



TEMPI 
FOFINP 



S# CS-D^a+FDFCNS 



INS: BINDEL CF0RDTA, (MAR) !■ TEMp)| 
CRCGENX (TEMP) I 
MAR »« MAR ♦ ip 
EXIT CFOFJi 
FDFT8L 
♦* 10,05 ** 

M8USA ,FCINOT 



RTNS * HOROS ♦ OFFSET 
INPUT SINGLE 



FOFINP 



FOFIS 



BRC 


BiNOELf »S*3 


BRA 


FOROTA 


LOPT 
BRC 


CRCSENX 


MWAIT 


,MEMPF4 


STB 
BRA 


IMAR 

PDF 


STB 


IMAR»SMR 



(COMMON CODE ROUTINE) 



( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
< 
( 
( 
( 
( 
( 
( 
( 
( 
{ 
( 



OATAPOINT CONFIDENTIAL INFORMATION " SEK PAGE I 
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FLEX/TXT 



MICRO-PROCESSOR FLEXIBLE DISKETTE CODE * HJS 
PERFORM BUFFER ^ PROCESSOR OPERATIONS 



7«JUL2ei 11144 



6091 
6101 
6Ul 
613. 
614' 
615, 
6161 
617^ 
618^ 
619. 
6201 
621. 



622. 
623; 
624, 
625^ 

626 . 
627. 



6281 



629, 
6301 
631, 

633^ 
634, 

635* 
636, 
637; 
638, 
6391 
640, 
6411 
642, 
6431 
644, 
645, 
646. 
6471 
648, 
649, 
650, 
651, 
652, 
653. 



654, 



004547L 



i04547L 

05545501 
0?l4551t 



004552L 
004553L 
004554L 
004555L 
004556!. 
004557L 



@04560L 
004560U 
004561L 
004562L 
0045631. 
004564L 
004565L 
004566U 
004567L 



00110001 
01010100 
00110111 



11010010 
01010001 
00000111 
00110001 
01010000 
00110111 



11011100 
11010100 
11010111 
00110001 
11010010 
00010001 
10001111 



11010010 
00000001 
10000010 



10001111 
10001000 
11110101 
U010001 

00000011 
10000001 



10001111 
10001110 
10000110 
00110000 
10001000 
10110011 
00000101 



004567L 00110001 00110000 
00457PIL 11010011 01110010 



004571L 

004571L 
004572L 
004573L 



00110001 
00000111 
00110001 



11010101 
11110101 
11010110 



IFNE FDFCNS>8,$>8 
XIF 
FDF 

i;,45 REPEAT 

2^30 END (WITHOUT SERVICE TO FDTEND) 

3,65 SERVICE 

(CARRY CLEARED BY CRCGEN) 
(OR FOR wpt BY FCN CALLER) 
URC S« URC •• U COUNT THE WORDS GOING 8Y 

DOPIP UR0 + URCiSB,l,URl4.URC 



FDFNXT 



IF URC ■ 
THEN BEGIN 

MBSTAT !■ FOFLENDI 
UR8 !■ UR8 ,XOR, 3 
8RA FDFNXT, FZ 
SAL MBSTAT, FDFLENO 

ROPIP UR0'«'UR8,XR,3,URI+URB 



ENO 
IF SRVREO ■ 
THEN EXIT (MBSTAT); 



END THE LOOPING 
MARK END PHASE NEXT 



GO TO SERVICE SOMEBODY? 
NO, KEEP ON GOING 



M8WAIT 

MWAIT ,MgMPF4 



TSTPT 
BRA 
LOTR 
BRR 



FI, SRVREO 
FDFLENO,FZ 
MAOR,CC 
MBSTAT 



FDFLEND 



MEMPP4 



IF SRVREO <> 

THEN EXIT (SRVRPT)l 

EXIT (PDTENO) 

TSTPT FI, SRVREO 
8RA FDTENO,TZ 

MBSTAT l« URHI 

URHL »■ MAR I 

MAR !• UROEl 

UROE !■ MCRCI 

MCRC »■ MARl 



LDRP MBSTAT, URI*URH 
LORP MAOR,URI*URL 



WAS IT SERVICE OR THE ENO? 



RESTORE THE REGISTERS 



(RESTORE STATE CORRECTLY BEFORE MEMPF) 



OATAPOINT CONFIDENTIAL INFORMATION * SEE PAGE 1 



PAGE 83 
6S6l 



FLEX/TXT 



657 , 

658 n 

659'. 

6601 
661. 



004574L 
004575L 
m457Bl 
004577L 
0(?)4600L 
004601L 
0«46i2L 
fi4603L 
«!?»4604L 
§046051 
804606L 
004607L 
00461JIL 
?!f461lU 

iei46l2L 
>09l4ei3L 

>0?l46l4t 



0(^0001i1 
00110001 
00110001 
0«U0001 
01101111 

00110001 

0U011U 
00010001 
001101U 
000l0ffl01 
00110111 
01110001 
0P(000111 
01110001 
00000111 
01011001 
11001111 



11110011 
10000110 
10100101 
11010100 

UU0010 
11010011 
11110001 
U110111 

10000100 
11110110 
10000011 
11110010 
11110111 
11110001 

11110110 
11111111 
UllllU 



MICRO-PROCESSOR FLEXIBLE DISKETTE CODE • HJS • 
PERFORH BUFFER - PROCESSOR OPERATIONS 



OLOX HR3HL 

OLORP TFMP,URI*UOE 

0LOPR URO+UOE»MCRC 

OLDRR MCRCTEMP 

8RAX SRVRPT 
END FDFCNS? 



78JULa0 11144 



fWILL 00 MEHPF INDIRECTLY IF NEEDED) 



DATAPOINT CONFIOENTIAL INFORHATION • SEE PAGE I 
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FLEX/TXT 



MICRO-PROCESSOR FLEXIBLE DISKETTE CODE - HJS f 78JUL20 tll44 
FINAL BUFFER OPERATIONS - CRC CHECK & OUTPUT * SPECIAL STUFF 



664- 
6S5. 
SB6, 
6S7, 

efls; 

669, 
670^ 
671. 
672, 

673. 



674 

675, 

676, 

677, 

678; 

6791 

680, 

681. 



6821 



683: 
684, 
685, 
686. 



687, 

688, 
689, 
690, 
691. 

692* 
693, 
694, 
695, 
6961 
697j 
698, 
699; 



7m, 
7011 
7021 



004$l!5L 



004615L 
004616L 
004617L 



00462aL 
004621L 
0i482gL 
004623L 
004624L 
004625L 
004626L 
004627L 
004630L 
004631L 
004632L 
i04633L 
004634L 
004635L 
004636L 
004636L 
004637L 

0B4640L 

004640L 
00464IL 



00464gL 
004643L 
004644L 
004645L 
004646L 
004647L 
004650L 
004651L 
004652L 
004653L 



00U0001 
01000101 

11010010 



00010001 
01010011 
11011100 
00110U1 
01010001 
11001111 
11011111 
00010000 
11010010 
01010001 
11001111 
11011111 
00010000 
11010010 

01011001 
1101U11 



01000101 
11010010 



00010001 
01010011 
11011100 
00110111 
00010001 
01101111 
01010001 
11011111 
00010001 
01101111 



11010001 
00100000 
01011111 



111100U 
00010000 
01101101 
00100110 
01101000 
00101101 
01001111 
U000110 
01001100 
01100011 
00101101 
01001UI 
11000111 
01001100 

11110100 

piiUiiii 



00010000 
01010001 



11110011 

10100000 

01011011 

00100110 
11110110 

11110001 

01010101 

UUllll 
11110111 
11U0001 



FDTEND 

11,70 INPUT-VERIFY 
10,60 OUTPUT 
6,60 WPI 

1,35 MOUT CALL TO FOTFINl 

8EGIN 

CASE UR8 ,ANO, FOMASK OF 
0, 1. 2, 3J BEGIN 

TSTIP ,FONINV,URI*URS 



BRA FOEOTiFZ 

8IN0EL fFOROTA, TEMP) » 
IF TEMP «> URO 
THEN EXIT CF0RCRC5I 
BINOEL (FDROTA, TEHP)» 
IF TEMP <» URE 
THEN EXIT (F0RCRC5? 

M8USAW MADR»FCINDT 



GET NEXT BYTES FOR INPUTS 
CRC NOT MATCH 

CRC NOT MATCH 



FDTFIX 



FOEOT 



8RC BINOEL, »S+3 

BRA FDRDTA 

TSTRT XR,MCRCH 

BRA FORCRCFZ 

BRC 8INDEL»»S*3 

BRA FOROTA 
TSTRT XR,HCRCL 
BRA FDRCRCFZ 

8RAX FOTFIN 

ENOI 

4, 51 BEGIN 
TSTIT ,FDNOT 
BRA FOEHPIX.FZ 
BOTINS (URO)r 
80TINS tURE3» 
M8USAW MADR»FCOUTC 



LORR TEMPI, MCRCH 
BRC BOTINS 
LORR TEMPI, MCRCL 



OUTPUT CRC BYTES 



DATAPOINT CONFIDENTIAL INFORHATION • SEE PAGE I 
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703*. 



704, 

7«5, 
706'. 



707^ 
708, 
709, 
710, 
71i, 
712, 
7J3, 
7141 
715, 
716, 
717. 



718, 
719, 
780, 
721. 
722* 
723, 
724, 
725. 

7261 



FLEX/TXT 



004654U 01010PI01 01100001 
0046551 U0111U UUUU 



004656L 0101100} UU0100 

004857L iiamn 10011000 



004660L 



004660L 
00466JL 
004862L 



0046631 



0046631 
004664L 
5I04665L 



0101000! 
01011001 
11011111 



01010001 
0J011001 

11011111 



10000010 
11110100 
01101111 



11000000 
11U»100 
01101111 



MICPO'-PPOCESSOR FLEXIBLE DISKETTE CODE - HJ8 • 78JUL20 11J44 
FINAL BUFFER OPERATIONS - CRC CHECK & OUTPUT * SPECIAL STUFF 



BRC 



B0TIN8,,F0TFIX 



• ENDI 

, 6: EXIT (FOEWPDI 

FOEWPIX BRAX FOE*^PI 



(WRITE THE FINAL P0STAM8LE) 



* 
FDRDTA 



* 



FDRCRC 



7S I 

END CASE! 
EXIT CFDTFIN) 
END FDTENOr 



BEGIN 

LUF !■ 02i2 t 02021 

EXIT CFENOIR) 
LDTI 0202 
BRAX FENOIR 



END FORDTA? 



BEGIN 

LUF i« 0300 ♦ 03001 

EXIT CFENDIRJ 
LDTI 0300 
BRAX FENOIR 

FNO FOROTAI 



OATAPOINT CONFIDENTIAL INFORMATION • SEE PAGE I 
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FUEX/TXT 



MICROS-PROCESSOR FLEXIBLE DISKETTE CODE - HJS 
MAIN CONTROL SEQUENCE «• READ A HEADER 



7BJU12B 11144 



789. 

7301 
7311 
7321 
7331 
734^ 
7351 



7361 
737J 
730' 
7391 
740^ 

7421 



743, 
744I 



7451 
747' 
748, 
749. 
750I 
751, 
752^ 
7531 



7541 



7551 



0!a4666L 



0a4666L 
004667L 
ii467(»L 
0?»467tL 
004672L 
004673L 
aP!4674L 

004675L 



g»04«75L 
«i4676L 
004677L 
0f470eiL 
0SI4701L 
(S04702L 
f!^4703L 



?!P!ilS|f01 

«lil00U 
00115)111 

0i(?ii00e)i 

00U01U 



uiiaau 

«0ifi0i0 

«01010!Sl 



00010001 

110U!(»0 
00110111 

00110111 

01010001 
11011100 
00U0101 



11110011 

01000001 
00100U0 
00101001 
00000001 
00111101 

00010101 



004704L 11000011 U10U01 



004705L 

i0470eL 

004707L 
004710L 
004711L 
004712L 
004713L 
004714L 
i047l5L 
004716L 
004717L 
004720L 
004721L 
004722L 
0i4723L 
004724L 
004725L 
004726L 
004727L 



00010001 

01010011 

110U100 
00110111 
01010001 
00110111 

00110111 

00010001 

01010011 
110U100 
00110111 
0101000} 
00110111 
00110111 
00010001 
01010011 
U011100 
00110111 
01010001 



11110011 
01100000 
00111000 
00100110 
11110101 
00100111 
00101001 
11U00U 
01110000 
0011 000 I 
00100U0 
01111110 
00100111 
0C5101001 
11110011 
01000000 
00101010 
00100110 
00000000 



♦ 

HDRERD 

, 9,00 

, BE<;iN 

, MBUS (MAOR, FCLEAR, FKRWMF) I 

, EXIT (HDREAO) 

MBUS MADR, FCLEAR, FKRWHF 



RE-READ HEADER 0I8ABLINS ANY PREV, I/O 



(NO POINTER FUNNIES CAN HAPPEN N0W5 



HDREAD 
, 7.95 



END HDREROr 

fOR 4,25 IF OFFLINE) 
RE6IN 

IF NOT FSONLN IN M8IN tMAORi FCINST) 
THEN EXIT (FXIQER); 

MBUS MAOR, FCINST 



LOTI FSONLN 
MBTIN 

IFNE l>9,FXI0ER>9 

XIF 

iRA FXIOER,TZ 

MBUS C^ADR, FCOSYM, SADUAL>8) I 
MBUS CMAOR, FCOSYL, 8A0UAL) I 
MBUS (Mj^DR, FCOTDP, FPTHDR>15> 
MBUS MAOR, FCOSYM, SADUAL>8 



SELECT CORRECT DRIVE 



SET THE SYNC WORO 



SET DISK BUFFER POINTER 
(JF,8R WASTED) 



MBUS MADR, FCOSYL, SAOUAL 



MBUS MADR, FCOTDP, FPTH0R>1 



DATAPOINT CONFIOENTIAL INFORMATION * SEF PAGE \ 
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756- 
757J 
7S0; 
759* 
760. 
7611 



762. 



763*. 
764*. 



7S5. 
766*. 



7671 

768. 

7691 
770, 
7711 



FLEX/TXT 



004730L 0iUPtui mimni 
004731L 0(?!U0iii miBimi 



MTCRO^PROCESSOR FLEXIBtE DISKETTE CODE • HJS • 
MAIN CONTROL SEQUENCE • READ A HEADER 



78aUl20 tU44 



004732L 
i»04733L 
004734L 
0047351. 
004736L 
004737L 
004740L 
0047411, 

004742L 
004743L 
004744L 
004745L 
004746L 
004747L 
0047601 
004751L 
0047521 
004753L 
004754L 
0047551. 
004756L 
004757L 
0i4760L 
00476a 
004762L 
0047631 
0047641 



01010001 
000001U 
00010001 
01010011 
11011100 
00110111 
01010001 

00U0U1 

00110111 
01010001 
00000111 

00010001 
il010011 
11011100 

00110111 

01010001 
00U0111 
00110111 
01010001 
00000111 
00010001 
01010011 
11011100 
00U0111 
01010001 
00110111 
00110111 



00100001 
11110111 
11110011 
10110000 
00100001 
00100110 
00001101 

00100111 
00101001 
11101111 
11110110 
U1100U 

00110000 
000Ui00 
00100110 

1 1 1 U 1 1 

00100111 
00101001 
101U000 
11U0101 
11110011 
11000000 
00001111 
00100110 
00000111 
00100111 
00101001 



»004765L 01011001 UllUll 
>004766l. 11001111 llUllll 



004767L 
004770L 
0047711 
i04772U 
0047731 
0047741 
004775L 
004776U 
004777L 



miiui 

lUUlH 
1 1 11 1 1 1 1 
lllllUl 
1 1 1 1 1 H 1 
lllllHl 
1 1 U 1 1 1 1 
lUlllll 
1 1 1 1 1 1 1 1 



uumi 
iiuiiu 
1 1 1 1 1 1 1 1 

lllllUl 
IHlUll 
UUllU 
IIIUIU 

1 m u u 

lUlUU 



MiUS (MADRf FCOIWT, FHINDX+FMTROK^FMTRER) I INTERRUPTS SET 
MCRC »• SACRCl INIT CRC 

M9U8 CMADRi FCLEAR, FKMAST+FKL0N5 ? CLEAR INTERRUPTS § TURN LIGHTS ON 
M8STAT «■ HORCHKf 

MBUS CMAOR, FCRHDR, FPLHDR>ni READ IN HEADER 

LORI HCRCL,SACRC 

MBUS MADR,FCOINT.FMINOX+FMTROK*FMTRER 



LORI MCRCH.SACROS 

MBUS MAOR, FCLEAR, FKMAST*FKLOW 



8AL MBSTATiHDRCHK 

M8US MADR,FCRH0R,FPLH0R>1 



RETURN CSRViSN) 
BRAX SRVBSN 

END HOREADI 

TABPAGE FLEXL 
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774' 
7751 
776y 
777. 
77r 
779; 



FLEX/TXT 



780. 
781*. 



7821 
783: 
784; 
785, 
786^ 
787. 
7881 
789y 
790. 

7911 
7921 
7931 
794, 
795, 
7961 
7971 
798, 
799, 
800 

8«l. 
8021 
8931 
804^ 
8«5, 
8061 



0US0ei0L 



0^500911 
0050011 
005002L 
009003L 
0050»4L 
005005L 
00S006L 
005007L 
005010L 
0050UL 
0050121. 
005013U 
005014L 
005015t 
0P'501«L 
0«^5017U 



005020L 
00502a 
005022L 



0050231 



00010001 
01010011 
11001100 
00110111 
01010001 
00110111 
00110111 
01010001 
00000111 
00010001 
01010011 
11001100 
00U0111 
01010001 
00110111 
00110111 



00010001 
01000101 
11000010 



11110011 
10110000 
11111101 

00001101 
00100111 
00101001 
11101011 
uuiieii 

llUf«ll 

00110000 

11H0100 

00100110 
10111111 

00ii0iu 

00101001 



11110100 

00100000 
10100011 



005023L 01000101 00001000 
005024L 11000011 11011001 



005025L 
005026L 
005027L 
0050301, 
005031L 
005032L 



00010001 

010100U 
110?»1100 
00110111 

01010001 

00110111 



111 10011 
01010000 
U101000 
00100110 
#0111111 
00100111 



MICPO-PROCESSOR FLEXIBLE DISKETTE CODE - HJS • 78JUL20 11 U4 
START TO PEPFORM THE ACTUAL OATA READ OP WRITE OPERATION 

« 

HDROK 

, MBUS (MAOR, FCOINT, FMTROK •♦' FMTRER ♦ FMINDX)| IT WAS, IT »«A8J 

, MB8TAT t« OONIOr WHAT KIND OF ACTION? 

, MBUS CMAOR, FCLEAR, FKMAST ♦ FKLON) | READY » LIGHTS 

MRUS MAORiFCOINTiFMTROK+FHTRER+FMINDX fJFiSR WASTED) 



BAL MBSTAT,D0N10 

M8US MA0R,FCLEAR,FKMAST+FKLaN 



READ IF THAT WHAT WANTED 

WRITE IF THAT WHAT WANTED 

00 0,C, GAP SIMILARLY 
DOES NOTHING EXCEPT 
SYNC INDEX PULSES 



IF PFREAD IN MBIT8 
THEN EXIT (OORFAD) 
ELSE IF FFWRITE IN HBITS 
THEN EXIT tDOWRITE) 
ELSE IF FFWDCG IN MBIT8 
THEN EXIT CDOWDCG) 
ELSE EXIT CHDREAO) 

TSTIR ,FFRMSK,MBITS 

BRA OOWRITE,FZ 
, BRA DORFAO 
, END PXIOI 
♦ 

OOREAp 
** 25,75 ♦* 

, ♦ 0,40 IF SECTOR ZERO • 0,10 IF DELETED DATA ♦ 3,05 IF DOUBLE DENSITY 
, BEGIN 

, IF FF08L IN MBITS DOUBLE DENSITY? 

T8TIT ,FFDBL 
BRA RDSGLiTZ 
THEN BEGIN 

MBUS tMADR, FCOTUP, FPTROTA»n; MUST DO SPECIAL CHECK 
MiUS (MAOR, FCOINT, FMINOX+FMTROK*FMTRER*FMPNTR) | 
M88TAT !■ OBLRED 
M8US MAOR, FCOTUP, FPTRDTA>1 COON'T WANT OATA, JUST INTERRUPT) 
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807. 



FLEX/TXT 



8918. 



839' 
810^ 
811, 
812f 

814- 
815^ 
816. 
817. 
818. 



819*. 



820. 
821^ 
8?S. 
823. 
824' 
825^ 
826. 



827'. 



0i5«!l33L 
005a34L 

035PI36L 
^«5«37L 
0lt»5(l4ML 
0W5W41L 
005SS42L 
0IS5043U 
0f5044L 
W0S«45l. 

0P5a4SL 

0«5S»46l. 
08I5PI47L 



eass'sii. 

05150521 

{^05054!. 
0P!5«55L 
0«5e(56L 
i?i?l5057L 

005<«61L, 
0l35ei62L 
005063U 
005t64L 
005PI65L 
0i5066L 



005067L 



005067t 
0050701. 
0050711 
005072L 
005073L 
005074L 
005075L 
005076L 
0050771 
005100U 

0051011 

005102L 
0W5103L 



00U0111 
00010001 
010100U 
11001100 

00110111 

01010001 
00110111 
00110U1 
01010001 

00000111 
00010001 



01000101 
11000011 



00010001 
01010011 

11001100 
00110111 
01010001 
00110111 
00110U1 
0001000] 
01010011 

11001100 
00110111 
01010001 
00110111 
00110111 
11001111 



00010001 
01010011 
11001100 
00U0111 
01010001 
00110111 
00110111 
00010001 
01010011 
11001100 
00U0111 
01010001 

00U0U1 



00101001 
11110011 

10U0000 

11100001 

00100110 
00011101 

00100111 
00101001 
11010100 
11110101 
11110100 



00010000 
11001000 



11110011 
01100000 
11010101 
00100110 
11110101 
00100111 
00101001 
111100U 
01110000 
11001110 
00100110 

01101010 
00100111 
00101001 
10U1010 



11110011 
01100000 
11000110 
00100110 
11110101 
001001U 
00101001 
11110011 
01110000 

1011U11 

00100110 

01101111 

00100111 



MICR0«PR0CeSSOR FLEXIBLE DISKETTE CODE m HJS • 78JUL20 11144 
START TO PERFORM THE ACTUAL DATA READ OR WRITE OPERATION 



M8US MA0R,FCOINT,FMIN0X + FMTR0H<fFMTRER+FMPNTR 



BAL 

LOTR 
ENDI 



MBSTAT,DBLRED 
MBITS 



RP8GL 



IF FFRDLTO IN M8ITS 
TSTIT ,FFRDLTD 
BRA RDHORMjTZ 
THEN BEGIN 

MBUS (MAOR, FCOSYM, SMDUAL>8n 
HBUS (MAOR, FC08YL, SMOUAL) 
MBUS MADR, FCOSYM, 8M0UAL>8 



(RELOAD BITS TO TEST) 

DELETED DATA SECTOR? 



YES, LOOK FOR IT 



MBUS MAOR, FC08YL, SMOUAL 



BRA ROOLTD 
, END 

, ELSE BEGIN 
RDNQRM 

, MBUS (MAOR, FCOSYM, SPDUAL>8) I 

, MBUS (MAOR, FCOSYL, SDDUAL) 

MBUS MAOR, FCOSYM, S00UAL>8 



NO, NORMAL DATA 



MBUS MADR, FCOSYL, SODUAL 
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8?8; 

830, 
831, 
832. 

833* 
834. 



835'. 



836. 



837. 
838 . 



0i5104L 5!0U0U1 0il01001 
0051051. 



005105L 
005106L 
0051071 
0051101 
005tUL 
0051 12L 
005113L 
005U4L 
005U5i. 
005116L 
0051171 
005120U 
0051211 
0051221 
0051S3L 
0051241. 
005125L 
005126L 
005127L 
0051301 
005131U 
>005132L 
>005133L 



00010001 

01010011 
11001100 
00110111 

01010001 
00110111 
00110111 
00010001 
01010011 
11001100 
00110111 
01010001 
00110111 
00110111 
00010001 
01010011 
11001100 
00110111 
01010001 
80110111 
00110111 
01011001 
11001111 



U 11001 1 

01000000 
10111000 
00100110 
00111111 
00100111 
00101001 
U 11001 1 
0011«00« 
10110001 
00100110 
00111111 
00100111 
00101001 
11110011 
11010000 
10101010 
«0100110 
10000011 
00100111 
00101001 

H 1 1 1 1 1 1 
IIUIUI 



MICPO^PPOCESSDR FLEXIBLE DISKETTE CODE - HJS • 78JUL2i 11:44 
START TO PERFORM THE ACTUAL DATA READ OR WRITE OPERATION 



RODLTD 



MBUS 
MBUS 
MBUS 



ENOI 

(MAOR, 
(MAOR, 
CMAOR, 



FCOTOP* 
FCLEAR, 
FCRTIM, 



FPTRDTA>nr 

FKMAST)! 

FPLR0TA>1J| 



POINT TO INPUT BUFFER 

CLEAR PNTR INTERRUPT THAT SET 

READ - IF NOT TOO LATE 



RETURN (SRVSSN) 



M8US MA0R»FC0TDP,FPTR0TA>1 



N8US MADRfFCLEAR, FKMAST 



M8U8 «ADRiFCRTlM,FPLROTA>l 



8RAX SRV8SN 
END OOREAOf 
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8391 

840. 

84i; 

842^ 
843. 
844^ 
845. 

846^ 

847. 

848, 
849' 
B9K 
851. 



FLEX/TXT 



852', 
8531 

8541 

8551 

8561 



857^ 

858. 

859' 
860^ 
861. 
862t. 
8631 



8641 



8651 



866; 
8671 
868. 



005134U 
005134L 
005135L 



?*05136t. 
005137L 
00514ffiL 
0«5141L 
005142L 
§051431 
?»pi5144t 
0<?!5145L 
f05146L 
005147L 
005150U 
iB515lL 
0?)5152U 
005153L 

0i5154i. 
0B5155L 
i8»5l56L 



08151571 
«i«5l6«L 
0W5J61L 
0?I5162L 
0«5163L 
0g5164L 
i05l65L 
005166U 
0i5167L 
0Pi517!:iL 
09151711 
005172L 
005173L 
0051741 
>i05l75L 
>i05176U 



005177U 



01000101 
11000010 



01010001 
00010010 
01010101 
01101111 
00010001 
01010101 
11001100 
01110010 
00110111 
00010001 
01010011 

11001100 
00110111 
00U0111 

00010001 
01000101 
11000010 



00010001 
01010011 
11001100 
00110111 
01010001 
00U0111 
00110111 
00010001 
01010011 
11001100 
00110111 
01010001 
00110111 
00110111 
01011001 
11001111 



00010000 
01110000 



01010100 
001U001 
11000000 
11110001 
11110100 
00000001 
10011011 
01110001 

00100111 
11110011 

105110000 
10010110 
00100110 
00101001 

11110100 

00001000 
10000000 



11U0011 
01000000 
10001110 
00100110 
00110111 
00100111 
00101001 
11110011 

11100000 

10000111 
00100110 

10001100 
00100111 
00101001 
1 1 1 1 I U I 

Ullllli 



MICRO»PPOCESSOR FLEXIBLE DISKETTE CODE • HJ8 • 78JUL20 1U44 
START TO PERFORM THE ACTUAL DATA READ OR WRITE OPERATION 

♦ 

* 

OOWRITE 

TSTIT ,FFWMSK 
BRA OOWDCG,FZ 
BRA OOWRITE 
24,05 + 0.10 IF SPRITE DOUBLE DENSITY (FROM HDRCRC) 
BEGIN 
MBUS (MADRr FCOMOO, 

C(F043MGC ♦ MDSKT) IaND. F043M8K) ♦ 

((MBIT5 .AND, FRDRV) ♦ FQDP0)n» SET CORRECT BIAS CURRENT 



OOTRI ,ACiMOSKT,FO43MGC.C0 

OORI TEMPI, ND,F043M8K 

OOTIR ,ND,FRORV,MBITS 

M8WAIT 

OOPR MIFDAT,AC,TEMPI,,CI 

M8US MAOR,FCOMOO 



BIT 6 <■ 43 § 8IT 7 > 43 



fCl TO ADO FODR0) 
(JF,flR iXASTED) 



IF FFSGL IN MBITS 
T8T1R ,FFD8L,M8IT8 

BRA wDBLiFZ 
THEN BEGIN 

MRUS (MADR» FCOTOP, FPTWS(5L>ni 
MBUS CMADR, FCWRTN, FPLWSSL>1) 
M8US MADR,PC0TDP,FPTWSGL>1 



SINGLE DENSITY? 



WAS SlNGLEi DO ITI 



M8U8 MAOR, FCWRTN, FPLWSGL>1 



WOBL 



8RAX SRVBSN 

END 
ELSE BEGIN 
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$69, 
870! 

87i; 



872. 



8731 

874;. 
875, 
876; 
877, 
878, 
8791 
8801 
88ll 
882; 
883, 
8841 
885, 
8861 
887, 
888. 



8891 
8901 



0?I5177U 
00520PIL 

0052011 
PI05202L 
0«S52i3t 
005204L 
0IS520SL 
0052061. 
0?I5207L 
0i58l0L 
0SI52UL 
gi52l8L 
0052131. 
0e!5214L 
>0052J5L 
»005218L 



0e!52l7L 
eP>5217L 
a0522»i. 
0052211 
005222L 



ii5223L 
ei5224L 
005225L 
005226U 
>005227L 
»0('i523iL 



01010011 

11001100 

00110111 
01010001 

00110111 
00U0111 

00010001 
01010011 
11001100 
00110111 
01010001 
00110111 
00110111 
01011001 
11001111 



11001100 

01011001 
01000101 
11010010 



00010001 
01010011 
00110111 
00110111 
010U00J 

11001111 



UU00U 

01000000 

01UU10 

00100110 
00111001 
00100111 
00101001 
11U0011 
11110000 

01110111 

00100110 
10001010 

00100U1 
00101001 

uuiui 

llUllll 



01110000 

11110110 

00001000 
01000010 



11110011 
10100000 
00100110 
00101001 
llUllll 
llUllll 



MICRO-PROCESSOR FIEXIBLE OISKETTg COOl » WJ8 • 78JU1.20 11J44 
START TO PERFORM THE ACTUAL DATA READ OR WRITE OPERATION 



* 

« 



oowncG 



MBUS (HAOR, FCOTDP* FPTWOBlM)! 
M8US CMADR, FCWOGP, FPLWD8t.>l) 
MBUS MAOR»FCOTOP,FPTWDSt,>l 



(MAS DOUBLEr DO ITl 



MBUS MA0R,FCW0GP,FPLWDBL»1 



BRAX 



SRVBSN 



end; 

RETURN CSRVBSN3 
ENO nOWRITEl 



MBWAIT 

8PGX 

T8TIT 

BRA 

BRA 



HOREAD 
,FFSMSK 
HOREA0,FZ 
DOWOCG 



BEGIN 

MBUS CMAORi FCWOCGJl 

RETURN (SRVBSN) 

M8USAS HAOR,FCWOCG 



8RAX SRVBSN 
END O0WOCG» 



SYNC IS: REAO NEXT HEADER 
WRITE D.C. GAP 
00 ITl 
COOES NO MNAIT'S ELSE PROBLEMS) 
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MICPO-PROCESSOR FLEXIBLE DISKETTE COPF m HJ8 *> 7BJliim 11144 
DISKETTE SUBfSVSTEM INSTRUCTIHN INTERFACE I/O TO DISK & BUFFER TO PROCESSOR 



893, 
894. 
8951 
896, 
897. 
8981 
899. 
900. 

9!?iil 



902' 

903^ 
904, 
905, 
906, 
907, 
908. 



9091 
9101 
911. 
9121 

9l3l 

915, 
9161 
919, 
920, 
921. 



9221 

9231 
924. 



925;. 
9261 
927, 
928, 
929. 



9S0l 

93 ll 

932* 
933. 
9341 



005231L 



005231L 
005232L 
0052331, 



00110001 
01000101 

11010010 



11011100 

00000100 
00101001 



00S234L 11001001 00111100 



005235L 
005236L 
005237L 

00524«L 
005241L 
005242L 



005243L 
005244L 
005245L 
005246L 
005247L 
805250L 

00S251L 
005252L 
0052531 



005254t 

005255L 
005256L 
005257L 
005260L 
005261L 
005262L 
805263L 
005264L 



00010001 
01000101 
U000«10 

00110111 

00110001 

00110001 



01010001 
00110111 
01010001 
00U0U1 
00110001 
00110111 

00110001 
01010101 
00000111 



00110001 

01010101 
01010000 
00000111 
00110001 
01010101 
01000000 
11000010 
01010011 



11110100 
00000010 

00011101 

00001100 
10001001 

10101000 



011001U 

11000000 
11101111 
11100000 
11010011 

00100001 

11010000 
00001111 

10110011 



11010010 
00000001 
00000011 

10110108 

11010001 
00111000 
00111000 
01001010 
11000000 



* 

FJtIOl 

, 19,60 • FOCMD 



ONLY IF PRIViD 



DO Ul 141 INSTRUCTION 

ANO NOT D0IN6 ANYTHING ELSE 



CORRECT PC FOR SPECIAL EXIT 



GET TRACK NUH8ER 
GET SECTOR NUW8ER 
GET ADDRESS OF DEVICE 



- FOOATA DOCUMENTED THROUGH THE CODE 

8ESIN 

IF SWUSER IN PSW 
THEN EXIT (IVI0L$)I 
T8TIP , SWUSER, PSWI 

BRA IVI0L5,FZ 
IF NOT ZERO IMP 

BRA F0aTA,T»,IZ 
THEN 8EGIN 

IF FRBUSY IN MBITS 
THEN EXIT (NOTYET)l 
TSTIR ,FRBUSY»MBIT8 

BRA NOTYET,FZ 
PC «■ MAR ♦ U 

STB IMAR 
OLDX MR2PC 

MTRAK l» URD| 
MSECT !■ UREf 
MAOR 8a URA .AND, 0171 
IFC APF 

XIF 

IFS APF 

DLDPI MARO,SVMTRAK 



LOPP MDW,URI*URD 

XIF 

OORIP MAOR»ND»017»URI+URA,CC 

MBITS S« (URC .AND, I) ,XOR, (FRBUSY ♦ FRDR03 

♦ CURB .AND. FFMASK)! GET DRIVE AND FUNCTION 

IF FFSYNC IN URB IF JUST WANT INDEX SYNC 

THEN MBITS !■ MBITS ,0R, (FRIXCT + FRIXCX); SET TO THIRD REV 
DOTIP ,NOfFRDRV,URI*URC 

OORI MBITS, XR,FRBUSY*FOOR0»,CC 

DOTIP ,NO,FFMASK,URI+URB 

TSTIT XR, FFSYNC 

BRA FXIOI.FZ 

OOTI ,0R,FRIXCT+FRIXCX 
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9351 
936. 

937'. 
938'. 
9391 
940. 
94ll 
942. 



943 
944. 

945; 
946. 



947. 
948^ 
949. 



9501 
951. 

953, 
994^ 

956' 
957. 

958^ 

Sf »J Ip p 

960, 
961, 
962. 
963^ 
964, 
969. 



966; 
967* 
968, 
969, 
972, 
973. 



974; 

976, 
977. 
978; 
979. 



FLEX/TXT 



MICPO-PROCeSSOR FLEXIBLE DISKETTE CODE • HJS • 78JUL20 11144 
DISKETTE SU8»SYSTFM INSTRUCTION INTERFACE I/O TO DISK & BUFFER TO PROCESSOR 



005265L 
0!?I5265L 
0i5266L 



mmmm 



00S267L 01010001 
005270L 00000111 



00S271L 
009272L 
005873L 
009274L 
009275L 



0fg276L 
00S277L 
005300L 
005301L 

00S302L 



005303L 

005303L 
005304L 
005305L 
005306L 



005307L 
005310L 
00S311L 
005312L 



11000100 
110101U 

00110111 
00110001 
00110111 



01010001 
00110111 
00110111 
01811001 
11001111 



09(11000! 
01010101 
01000000 
11000011 



00010001 
01000101 



11110100 
11110100 



11101110 
10110101 

01000110 
00010110 
0000U01 
11010100 
00100001 



00000000 
00000001 
00000U0 
11110111 
1 U 1 1 1 1 1 



11010001 
00111000 
00U1000 
00110101 



11110100 
00000010 
00011101 



FXIOl 



DORR MBlTSiOR,MBITS 

MBSTAT t» HOREROI 
lAKCODE »■ 01 

IMP IS FLAGS S« 01 
EXIT (MBSTRT) 
SAL MBSTAT,HDSTRT#CC 

IFS APF 
MWAIT ,MEMPF5 

STi OMAR 

LOPP MOW,URI*URE 



XIF 

LOPI LIMP,0 

LDPT LUF 

8RAX MBSTRT 



ENTER THROUGH FRONT DOOR 
AS IF GOT INTERRUPT 
DONE FOR INITIAL DRIVE SELECT 
MARK START TO DO IT 
GO READ FIRST HEADER 
(STATE IS TO RE^DO HEADER READ) 



(WRITE DESIRED SECTOR IN MEMORY) 

(T»REG MUST BE AT MBSTRT) 
(ENTERS WITH lAKOOE OF ZERO) 



. 4,15 



FDATA 
. 4.15 



FDATAl 



(NO FETCH) 
END 

ELSE BEGIN 

IF UR8 *> FDOUT 
THEN BEGIN 

IF FRBUSY IN M8ITS 
THEN EXIT (NOTYET)I 
MADR !■ URA .AND*. 017 1 
ENDI 
IFS APF 

- STARTUP -» ,59 IF 070 - OUT 
DOTIP ,N0fFFMA8K,URItURB 

TSTIT XR,FOOUT 

BRA FDATAl, TZ 

XIF 

IPC APF 

XIF 

TSTIR , FRBUSY, MBITS 

BRA NOTYET,FZ 

MAR !■ URDE» 
UROE ta MCRCl 
MCRC «■ MAR» 
MAR ;■ URHLt 
URH !■ MBSTATI 



SAVE THE REGISTERS 
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981 



FLEX/TXT 



982, 
984'. 



985*. 



986. 
987*. 
988'. 



989. 

990. 



991. 

9921 
993^ 
994, 
99Sl 
996^ 

997 m 



9 



005312L 
005313L 
005314U 
0953151. 
0e»5316L 
00S3t7L 
005320L 
005321L 
0^532SL 
0?I5323L 
005324L 
0053251 
005326L 
005327L 
005330L 
0053311 
0053321. 
005333L 
005334L 

005335L 
005338U 
005337U 
005340L 
005341L 



0011000! 
00110001 

00010001 

00110U1 
00010001 
00110111 
00110001 
00000111 
00110001 
00000111 
00110001 
00110001 
00010001 
00110111 
00010001 
00110111 
00110001 
01010101 
00000111 

00110001 
01010101 
01010010 
01101U1 
1U01111 



998 
999 

1000' 00534SL 

1001^ 

1002. 

1003^ 

1004. 00534fL 
005343L 

1005, 005344L 
1006'. 



01010001 

01101111 
11011111 



11000100 
llltiill 

11110111 

10000100 
11110110 
10000011 
10010000 
11110111 
10110000 
11110110 
11000110 
11100101 

11110011 
10000110 
10110101 

10000101 
11010000 
00001111 

111100U 

11010001 
0000001 1 
00010101 
10110000 

00000000 



10000000 
11110001 

01011110 



MICPO-PROCESSOR FUEXIBI.E DISKETTE CODE * HJ8 • 7aJUL!>0 11:44 
DISKETTE SUS^SYSTEM INSTRUCTION INTERFACE I/O TO DISK % BUFFER TO PROCESSOR 

, mi tn MAORI 

OtOX 0E2HR 

OlDPR URO+UOE»MCRC 

DUORP HCRCMARI 

OLDX ML2MR 

LDPR URO*URL»MADR 

LDPR UR0+URH,M8STAT,,CC 

DORIP HAOR,NDi017,URI+URA 



(SAVE MBSTAT FOR INTERRUPT ROUTINE) 



CASE URB .AND. FDSMSK OF 
OOTIP ,NDfFD8MSK,URI+UR8 

DORA LINK,ACiFDTBL,,CC 



141 • FDATA INSTRUCTION 
CCC FOR FDTFCN AT LEAST) 



8RR LINK 

EXIT CFOTFIN)! 

EXIT (FOTENO)» 

EXIT CFDTFCNil 

EXIT (FOINIT); 



3t 
21 

It 

01 



END CASE 



t 

* 

NOTVET 

, 3.95 INCL IFETCH 

, LUF xm 0200 + 02001 

, EXIT (FENDIT) 

LORI TEMPI, 0200 

BRA FENDIT 
, END NOTYETl 



ERRORS, DID NOTHING 



CARRY TRUE# ZERO TRUE 



DATAPOINT CONFIOENTIAU INFORMATION » SEE PAGE J 



PASE 36 



FLEX/TXT 



MICPO-PPOCESSOR FLEXIBLE DISKETTE CODE • HJS - 78JUL20 1U44 
DISKETTE SUB-SYSTEM INSTRUCTIOM INTERFACE I/O TO DISK & BUFFER TO PROCESSOR 



1087 
1088 

laisa 

1011 

1012 
1013 
1014 
1015 

1016 



00534SL 
005345L 
00534«L 

f?0S347L 
i05350L 
0053511 
0053521 



* 
FOTENX 



01011001 

11011111 

11011U1 
11001111 
11011111 



UU0110 
01110010 

01110011 
00011010 
10100101 



BRAX FOTENO 



* (TABLE NOT TOTALED IN TIMING) 
BRA FDTFIN 
BRA FOTENX 
BRA FDTFCN 

F0T8L 

, BRA FDINIT 

, END FXIO» 



PAGE 37 



1017*. 
1018; 
1019!. 
10S0. 
1021. 
1022. 
1023*. 
1024' 
1095. 



1026. 
1027^ 
1028^ 
1029. 
1030, 
103lJ 
1032- 
1033. 
1034*. 



1035. 

1036' 
1037, 
1038. 

1039' 
1040, 
1041, 
1041. 
1041' 
1041, 
1041, 
1042. 



1043'. 

1044' 
1045, 
1046, 
1047; 



FtEX/TXT 



005352L 



005352L 
005353L 
005354U 
005355L 
005356L 



00110001 
01010011 
00110111 
01000000 
11010011 



H01i00l 
00000001 
10000001 
001U001 
10100101 



005357L 01000000 00110001 
005360U 11010010 11110010 



00536JU 
005362L 
0053631 
085364L 
00536SL 
005366L 
005367L 
005370L 
005371L 



005372L 
005373L 
005374i, 

005374L 
005375L 
0053761. 
005377L 
0054001. 
0054011 
00548!2I. 
0054i3U 
0054(?|4L 
005405L 
005406L 
0054071 
0054iaL 
005411U 
005412U 



00010001 
01010011 
11001100 
00110U1 
01010001 
0PI110U1 
00110U1 
01010001 
00110111 



01010001 

01101U1 



11001111 
11001111 
11001111 
11011111 
11011111 

0001000! 
010100U 
U01U00 
00110111 
©1010001 
00110111 
00110111 
01110001 

0U01U0 

11000010 



11118011 

01010000 
00001100 
00100110 
001101U 
00100111 
00101001 
00001100 
10000010 



11111100 
11110001 



00000010 
00000001 
00000000 
llllllU 
U111110 

111100U 

10100000 
11111100 
00100110 
11111111 
00100111 
00101001 
11110001 
01110001 
00000011 



OATAPOINT CONFIOEMTIAL INFORMATION • SEE PAGE I 

MICRO-PROCESSOR FLEXIBLE DISKETTE CODE « HJS • 78JUL20 11144 
DISKETTE 8UB<pSYSTEM INSTRUCTION INTERFACE I/O TO DISK & BUFFER TO PROCESSOR 

♦ 

FDINIT 

7,65 4.,10 IF OLTO (00,10,20,30), 7,20 (40,50), 11.30 (60), .70 (70) 
SE6IN 

UR8 I» UR8 ,0R, 1| MARK FOR FDATAFCN STATE 

IF UR8 ■ FDOUT ,0R, I MOUT OPERATION? 

THEN EXIT (F0TFCN3I 

OOPIP UR0*UR8,0R,l,URI+URB 



FDTINI 



1 



TSTIT XR,FDOUT+l 
BRA FnTFCN,T2 
IF URB ■ FDWPI ,0R, 
THEN iEGIN 

TSTIT XR,FDWPI+l 
BRA FDREG.FZ 

HBUS (MAOR, FCOTUP, FPTWSGL^Ul 
URC f 121 
N8U8 MAOR, FCOTUP, FPTW8GL>1 



PREAMBLE INITIALIZE?? 



POINT TO INIT AREA 

12 BYTES IN SYNC AREA 



LOPI UR0+URC,12 
FOR I « 1 TO 4 



DO 
LDRI 



RPT 
BRA 
BRA 
BRA 
BRA 
BRA 
M8US 



M8US (MADR, FCOUTC, 0377) | 
TEMPI, 1.4 



INIT D,C, GAP AREA 



5 

$♦1 
$ + 1 
1*1 
f + 1 
i + l 
MADR, FCOUTC, 0377 



(DELAY FOR 2 MICRO-SECONDS) 
(BETWEEN BUFFER WRITES) 
(BETWEEN SUFFER WRITES) 
(BETWEEN BUFFER WRITES) 
(BETWEEN BUFFER WRITES) 
(BETWEEN BUFFER WRITES) 



INCR 
BRA 



TEMPI, TEMPI 



005413L 00010111 10110010 
005414L 11011U1 10100101 



FDTINI,PZ 
EXIT (FDTFCN) 
CCLR 
BRA FDTFCN 



DATAPOINT CONFIDENTIAL INFORMATION • SEE PASE I 



PAGE 3a 



FLEX/TXT 



MICPO-PROCESSOR FLEXIBLE DISKETTE CODE * HJS •• 78JUL?0 IHA4 
DISKETTE SUB»sySTEH INSTRUCTION INTERFACE I/O TO DISK & BUFFER TO PROCESSOR 



1048. 
1049^ 

1050- 

1052, 
10531 
1054. 
1055^ 
1056, 
1057, 



1058, 
1059. 



1060, 
1061* 
1062. 
10631 
1064^ 
1065, 
1066, 
1067, 
1068, 
1069, 

10701 
10711 



10721 

10731 
10^4, 
1075; 
10761 



10771 

I05'9l 
1079, 
10601 
1081, 
10821 



0a54l5U 



005415L 
005416L 
005417L 
005420L 
00542«L 
«0542a 

005422L 
005423L 
i05424L 
005425L 
005426L 
005427L 
005430L 



FDREG 



a0543lL 
005432L 
i05433L 
005434L 
005435L 
005436L 
005437L 
005440L 
i05441L 
005442L 
005443L 
005444L 
005444L 
005445L 
005446L 
005447L 
005450L 
i0545lU 
005452L 
005453L 
005453L 



01010101 

11010010 

01010001 

01010101 
00U0UJ 

00010001 
01010011 
11011100 
00110U1 
01010001 
00110111 
00110111 



00110001 
01000101 
11010011 

01010001 

00000111 
01010001 
00000111 
01010001 
01101111 
01010001 

11011111 

01010001 
09000111 
01010001 

00000111 

01010001 
0U0U11 
01010001 



00001000 
11101111 
10000000 

10000000 
10000010 

U110011 
01010000 
11101011 
00100110 
00111111 
00100111 
00101001 



11010001 
00000100 
11011011 
11100111 
11110111 
10001111 
11U0110 
0U01010 
11110010 

U110101 

11010100 

10000100 
11U0111 
10U1111 
U110110 
01101U1 

11110010 
11110101 



01101111 U110001 



005454L 00110001 11010001 
005455L 01000101 00100000 



FDROBL 



FOTNRM 



FOTLTO 



ENOi 

IF FODBL IN URB 

THEN URC !■ 256 | 

ELSE URC ;■ 1281 

T8TIT Nn,FDDBL,,,TW 

BRA FORDBL,FZ 

LDTI 128 

OOPI UR04.URC»N0,128 

MBU8 CMADR, FCOTUP, FPTROTA^Df 
M8US MAOR, FCOTUP, FPTR0TA>1 



256 DATA BYTES 
128 DATA BYTES 



POINT TO SYNC BYTES 



IF FOLTO IN URB 

THEN BEGIN 

URDE «■ SMCRCI 
TEMP l« 5M0UAL 
END 

ELSE BEGIN 

URDE IB SOCRCI 
TEMP II SDOUAL 
END I 
TSTIP ,FDLTO,URI*URB 

BRA FOTNRM, TZ 
OLDRI MCRCSMCRC 



LORI TEMPL,SMDUAL 



INIT CRC FOR OELETED DATA 
INIT SYNC BYTES ALSO 



INIT CRC FOR NORMAL DATA 
INIT SYNC BYTES ALSO 



LOTI 
BRA 



SM0UAL>8 
FDTLTD 



5L0RI MCRC.SDCRC 

LORI TEMPLiSDDUAL 

LOTI S00UAL>8 

LORT TFMPH 

IF FOOUT IN URB 

TSTIP ,FDNINV,URI4.UR8 



DATAPOINT CONFIDENTIAL INFORHATION - SEE PAGE I 
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FUeX/TXT 



HICRO-PPOCESSOR FLEXIBLE DISKETTE CODE • HJ8 • 78JUL20 11144 
DISKETTE SUB-SYSTEH INSTRUCTION INTERFACE I/O TO RISK & BUFFER TO PROCESSOR 



1083 0i5456L 1101001! 10U1010 

10S4. 

10S5, 

1086. 

1087! 



10881 
1089^ 
1089, 
1089^ 
1089. 
1089. 
1089^ 

1089, 
1090. 



1091' 
1092, 

1093^ 

1094 

1095, 

1096, 

1097, 

1098, 

1099, 



1100, 
1101. 

U02l 
1103, 
1104, 
1104, 
1104, 
1104, 
1104, 

1104, 
1104, 
110S. 



005457L 
00546iL 
005461L 

00546gL 
005463L 
005464L 
i05465L 

00546SL 
005467L 
005470L 

005471L 
005478L 
005473L 
005474L 
005475L 
005476L 
005477L 
805500L 
005501L 
00550JL 
005503L 
005504L 



005505L 
005505L 
00S506L 
005507L 
005510L 
005511L 
005518L 
005513L 
005514L 
00S515L 

005516L 
005517L 
005520L 
005521L 
005522L 
005523L 
005S24L 
005525L 



§0010001 

01010011 
11011100 
00U0111 
01110001 

00110111 
00110111 

11011111 

110U1U 
11011111 
11011111 
11011111 
11011111 
11011111 

00010W01 
01010011 

11011100 

00110111 

01U0001 

00U0111 
00110111 
11011111 



00010001 
01010011 
11011100 
00110111 
00110111 
01110001 
11011100 
001 10000 
11010010 

llilUl! 
11011111 
U011111 
11011111 
11011111 
11011111 
1 1 1 1 U 1 
00110U1 



11110011 

10100000 
11001U0 
00100110 
11110001 

00100111 
00101001 

11001000 
11000111 
11000110 
11000101 

11000100 
11000011 
U000010 
10110011 
10100000 
11000000 
00100110 
10110010 
00100111 
00101001 
10100101 



11110011 
00010000 
10U1000 
00100110 
00101001 
11110001 
10110100 
00010101 
10011010 

10110000 
1010UU 
10101110 
10101101 
1010U00 
101010U 

10101010 
00101001 



BRA FPTINVR.TZ 
THEN BEGIN 

MBUS CMAORi FCOUTC, TEMPH)| 
MBU8 CMAORi FCOUTC, TEHPL) 

MBUS MADR, FCOUTC, ,T|MPH 



OUTPUT SYNC BYTE MSB 
AND SYNC L8B 



RPT 7 

BRA 1*1 

BRA $+1 

BRA $*i 

BRA 1+1 

BRA *+t 

BRA S+1 

BRA S+l 

MBUS HAOR, FCOUTC, ,TEMPL,CC 



t2 MICPO-SECONP DELAY NEEDED? 



FOTINVR 



BRA FDTFCN 
END 
ELSE BEGIN 

IF MBIN (MAOR, FCINOT) 
THEN EXIT £FDRDT5X)| 
IF MBIN (MAOR, FCINDT3 
THEN EXIT tFOROTSX) 

MBUS MAOR, FCINOT 



<> TEMPH MAKE SURE CORRECT SYNC BYTE 
*> TEHPL MAKE SURE CORRECT SYNC BYTE 



LOTR 


TEHPH 


MBTIN 


XR 


BRA 


FDRSYNCFZ 


RPT 


7 


BRA 


$♦1 


BRA 


S*l 


BRA 


$♦1 


BRA 


S*l 


BRA 


$♦1 


BRA 


s+l 


BRA 


s+l 


STB 


MIFST8 



OATAPOINT CONFIOENTIAU INFORMATION • SEE PAGE 1 
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FieX/TXT 



MICRO^PROCESSOR FLEXIBLE DISKETTE CODE « HJS * 78JUL20 UM4 
DISKETTE SUB^SYSTEM INSTRUCTION INTERFACE I/O TO DISK & BUFFER TO PROCESSOR 



iipi?, 

U08* 

U10, 
lltl, 

uial 

1113. 



icissaeL 

0a5527L 
00S53BL 
005531L 



0Ul?)i01 
U01U0P 

110l09llf 



00ii«iii 
leiiiiaia 



* 



LDTR TEMPL,CC 
MBTIN XR 

BRA FORSYNCFZ 
BRA FDTFCN 
END I 

EXIT CFDTFCN) 
ENO FDINITf 



OK, GO 00 HAIN WORK 



OATAPOINT CONFIOENTIAU INFORMATION "■ SEE PAGE I 
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FLEX/TXT 



MICRO'-PROCESSOR FLEXIBLE OISKETTE CODE » HJS • 78JUL?0 11144 
DISKETTE SUi»5YSTEM INSTRUCTION INTERFACE I/O TO DISK S BUFFER TO PROCESSOR 



r 



1149 

use 
iisr. 



U52l 
H53, 

1153, 
1153, 
tl53. 



0St553gU 



005532U 00lliUl ei?l0i81U 



11141 
1 115, 

Hie; 

1U7, 

uis: 
iiisj 

U20. 
il2i', 
1122^ 
1 1 23s 



1124. 

1125* 
1126, 
11271 
1128. 
1129' 
1130, 
U3l^ 
1132, 
11331 
1134, 
1135, 005545L 

1136J 
J 1371 

1138, 
1139. 
11401 
U41. 
11421 
11431 
U44, 
1145. 
1146, 
U471 
1148, 



EJ055331 
005534t 
0355351 
005536L 
0055371 
005540L 
0«5541L 

005542L 
005543L 
005544L 



00110001 
01010101 
01810010 
000001U 
11011100 
0001000) 
11010100 
01011001 
11010111 
10001111 



11010001 
00111000 
10100110 

H110101 

10100000 
10110011 
10011110 
11110110 
10000110 
00000101 



005545L 01010001 10000010 
005546L 11011111 01101111 



0055471. 

005547L 
005550L 



0055S1L 
005552U 
005553L 
005554L 
005555L 
i05S58L 
0055571 

005560L 
005561L 
005562L 
009563U 
005564U 



01000000 
11010010 



00010001 
01010011 
1101110f» 

00110111 

01010001 
00110111 
00110111 

11011111 
11011111 
11011U1 
110111U 
11011U1 



00110010 
01110011 



111 10011 

01010000 
10010100 
00100110 
U000010 
00100111 
00101001 

0001110 
0001101 
0001100 
0001011 
0001010 



* 

FDTFCN 
. 1.50 



BEGIN 

STB SMR (EVEN IF NOT NEEDED) 

MftSTAT !■ CASE UR8 .AND, FDMA8K OF SET UP LOOP ROUTINE 

(INS, IND» VRS, VROf 0T8, 0T0» WPIi OUTH 
EXIT CMBSTAT) 

DOTIP ,ND»FDMA8K,URt+URB 

DORA M88TAT,AC»F0FTeL 



M8WAIT 

LOTR MADRfCC 
MWAIT , IGNORE 
iPGX FDFTBL 
SRA MeMPF4,T(!»,MP 
BRR M8STAT 
END FOTFCNf 

END FENOIT? 



CCC IS FOR FOWPI, FDF) 

(POINT TO PACE 4 SO CAN) 

(RESTORE RESS 8EF0RE MEMORY FAULT) 



■ 

FDRSYNC 

, 5.80 INCL IFETCH 






BEGIN 

LUF 8« 0202 ♦ 02021 

EXIT CFENOIR) 
LOTI 0202 
BRA FENDIR 

END FORSYNCl 



ERROR, BAD SYNC BYTES 



CARRY TRUEi ZER0»8IGN FALSE 



FDEWPI 



61 BEGIN 

TSTIT XR,F0WPI+2 

BRA FOTFIN, FZ 

MBUS (MAOR, FCOTUP, FPTW8GL ♦ FPLWSGL»ni POINT TO P0STAM8LE 
MBUS (MADR» FCOUTC, SOCLK)| PUT OUT POST BYTES ALSO 

MBUS (MADR, FCOUTC, SQCLK) » 

MBUS MADR, FCOTUP. FPTWSGL+FPLWSGL»2»1 



RPT 


7 


BRA 


S + 1 


BRA 


»♦! 


BRA 


S+1 


BRA 


S*l 


BRA 


$♦1 



(2 MICRO^SECONO DELAY) 



DATAPaiNT CONFIDENTIAL INFORMATION m SEE PAGE I 
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FLEX/TXT 



MICPD^PROCeSSOR FLEXIBLE DISKETTE CODE - HJS • 78JUL20 UJ44 
DISKETTE SUBsSYSTEM INSTRUCTION INTERFACE I/O TO DISK & BUFFER TO PROCESSOR 



U53: 
U53l 
tl54. 



1155, 
J15$J 

use, 
use!, 
iisa, 

U56, 
1156, 

use: 

1157. 



U58, 
1159, 

Ilia, 

llfll. 
11621 
1163, 
1164, 
1165: 
U66, 
1167. 



0P!5569L 
005566L 
005567L 
00557«»L 
09I5571L 
005572L 
06I5573L 
0f5574L 
005575L 

09I5576L 
005577L 
0CI56BftL 
«Pt5601L 
005602L 
005603L 
005604L 
09I5605L 
005606L 
0(i!l5607L 
005610L 
0056UL 
005612L 
005613L 



005614L 



005614L 
00561SL 
005616L 
005617L 



u«8; 

1169; 

1170; 
U7i: 

1172, B05620L 

11^3, 

1174, 

11751 

1176, 

1177, 

U78, 

1179, 

U80, 

llil, 

1182; 

1183: 



H0UUI 
1101 11 11 

0i0l0«0l 

0101001! 
U01U00 
00110111 

01010001 
00110111 
00110111 



1101 
1101 

1101 

UiJl 
H01 
1101 
1101 

0001 

0101 
1191 
0011 
0101 
0011 
00U 



1111 
IIU 
1111 

nil 
nil 
nil 
nil 

0001 
0011 

n0» 

0111 
0001 

01 n 

0111 



00110001 
01010011 
00110111 
01010001 



10001001 
10001000 
11110011 
10190000 
10000110 
00100110 
10101010 
00100111 
00101001 

10000000 

01111111 
01111110 

pinni0i 
pinni00 
01111011 
iiinaia 
miwaii 
I0ii0i00 

01111000 

00100110 
10101010 
00100111 
00101001 



11010001 

00000011 
10000001 
00000000 



BRA 


1 + 1 


BRA 


1+1 


M8US 


MAORiFCOUTCiSOCLK 



RPT 


7 


BRA 


$ + 1 


BRA 


$♦1 


BRA 


S + 1 


BRA 


S+l 


BRA 


S + l 


BRA 


1*1 


BRA 


$+1 


M8U8 


MADR,FC0UTC»SOCLK 



(2 MICRO-SECOND DELAY) 



* 



FDTFIN 
6.00 






FENpIR 
, 5,58 



005620L 01101111 11110001 
00S621L 00110001 11010101 



BRA FDTFIN 
ENOI 



INCL IFETCH 

BEGIN 

UR8 If UR8 ,0R. 3| 

LUF !■ ♦ i» 

EXIT (FEN0IR5 

DQPIP UR0*URB,0R,3,URI+URB 



TCLR 

BRA FEnOIR 
END FDTFINf 



INCL IFETCH 
BEGIN 

MB8TAT JB URHI 
MAOR $• URL» 
HU l« MAR» 
MAR l« DE» 
OE !■ MCRCI 
MCRC I" MAR? 
EXIT (FENOIT) 

LORT TEMPI 

LORP MBSTAT,URI+URH 



MARK THE END 
WITHOUT ERRORS 



CARRY FALSE 



RESTORED REGISTERS 



OATAPOINT CONFIDENTIAL INFORMATION • SEF PAGE I 
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1184*. 
1185*. 
11861 
1187'. 

11881 

1189* 
1190, 
1191. 



FLEX/TXT 



11981 



U99l 
12001 

laeil 



005628L 
005623L 
00S624L 
09I5628L 
005626U 
ii5fi27U 
«05630L 
005631L 
005632L 
0i5633L 
005634U 
00583SL 
005636L 
805637L 
00564Pit 



1192, 005641L 

1193^ 

1194, 

1195, 

1196' 

11971 



i0564JL 
005642L 
005643L 
0056441. 
0i5845L 
005646L 
0i5647U 
>i0565!'»L 
>(3i56Sa 



03(000111 
0011000! 
80000111 
00110001 
00110001 
(9011000! 

00110001 
00010001 
00110111 
0001000! 
00U0111 
00110001 

8^0000111 

0011000! 
00000111 



01110001 
01110010 
00110111 
00110001 
01010101 
00110111 
00110111 
01011001 
11001111 



11110101 
11010110 
11110011 

10000110 
10100101 
11000100 
11100011 

11110111 

10000100 

11110110 

10000011 
10010000 
11110111 

10110000 

11110110 



11110001 
00110001 
00000110 

11011100 

11011111 

10001100 
00000100 
lllUlll 

! 1 1 1 1 1 1 1 



MICRO-PPOCeSSOR FLEXIBLE DISKETTE CODE - HJ8 • 78JUL20 UJ44 
DISKETTE SU8f»SYSTEM INSTRUCTION INTERFACE I/O TO DISK & BUFFER TO PROCESSOR 



LDRP HAORfURI+URL 

OLDX MR2HL 

DLDX Df2MR 

DLDPR URO+UDEiMCRC 



(AS TEMPORARy HOLDINS REG) 



OLDRP MCRCHARI 



, BRA FENDIT 

, END FENDIRf 

♦ 

FENpiT 

, 3.55 INCL. IFETCH 

, BEGIN 

, MOON t« PSW ta PS«l ,ANO, wl»8WRPT| 

f 



DISABLE REPEAT STATUS 
RETURN (FETCH) 

OOPRR LUFiAC, TEMPI, TEMPI, C0 (DONE NOW WITH COMMON CODE) 



OOPIP PSWO,NO,«l*SWRPT,PSWl 



LDPT MODW 
BRAX FETCH 



PAGE 44 



FLEX/TXT 



( 



OATAPOINT CONFIDENTIAL INFQRHATION • SEE PAGE 1 

HICPO-PROCESSOR FLEXIBLE OISKETTE CODE - HJS " 78JUL20 11144 

DISKETTE SUfS»SYSTEM CONTROL AND STATUS INFORMATION » INITIALIZE 



IZ94', 
i2(»5l 

12818: 

1209, 
1210, 
12Ul 
12t2. 

12131 

1214. 
1215, 
1216, 
1217. 

12181 

12191 



1220- 
1221. 



12221 

1223, 
1224, 
12251 



1226 
1227 

1228; 
1229] 
1230 
123l! 



0a5652L 



0«5652L 
ii5653L 
005654L 



e?»5655L 
i0565«L 
08!5S57L 
0S»5«6iL 

msmn 

005662L 



00110001 
01?!?l01il 

11010^10 



000100101 
00110111 
00010001 

001101U 
00010001 

00110111 



11011100 
00000100 
00101001 



11110100 

10000000 

1UU001 

10000011 
111 1 1000 
10000100 



>005663L 01011001 llllUU 
>005664L U001001 Ilium 



005665L 

005666L 

005667L 

»005670L 



01010001 
00000111 

00000111 
11001111 



00000000 
11110101 
U110100 
1 I U 1 1 11 



FXSTAT! 

, 3,45 - FXSTAT 

, 5,85 - FXSCLR 

I BESIN 

, IF SWU8ER IN PSW 

, THEN EXIT CIVI0L«)I 

TSTIP ,SWUSER,PSNI 



BRA IVI0L5,FZ 
URA »• MBITSI 
URD if MOSKTI 
ORE '«■ HDSKSI 

LOPR UR0*URAfM8IT8 



ONLY ALLOW IF PRIVED 



GIVE USER STATUS OF I/O 
TRACK NUMBER 
SECTOR NUMBER 



LOPR URO*URD,M0SKT 

LOPR URO*UREiMDSKS 

IF NOT ZERO IMP 

BRAX FETCH!, T#,n 

THEN BEGIN 

MBITS t« 0; 
MBSTAT !■ NOTHINGTOOO 
BAL MBSTAT,-! 

LORT MBITS 

BRA FETCHI 
END 
ELSE RETURN tFETCHi) 
END FX8TATI 



FXSCLR 
(LOADS TwREG WITH ZER05 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 



PAGE 4S 



12341 
123S^ 

1236* 
1237, 

12381 
1239' 
1240. 

1241, 
1242. 
12431 
12441 



12451 
1246, 

1247, 
1248, 

1249, 
1250y 
12S1. 
12521 
1253, 
1254. 
12551 
12561 



FLEX/TXT 



MICPO-PRnCESSOR FLEXieuE DISKETTE CODE • HJS m 
MICRO-BUS LOW LEVEL INTERFACE INSTRUCTIONS 



78JUL20 11144 



1257. 

1258, 

1259, 

1260, 

1261 

1262, 

1263, 

12841 

12651 
1266. 

1267* 
1288, 
1269, 
1270, 
127lJ 

li C / £ * 

1273, 
1274. 

12751 

1276* 
1277, 

1278. 



0I?!5671L 



005671L 
ei05672L 
005673L 
ei05674L 



01000101 
11»105»1«« 
U01H0S9 



U01U00 
9!01018|?ll 



0W5875L 11011010 0011IH100 



005676L 
005677L 
005700L 
005701L 
005702L 
0i?i5703L 
005704L 
005704L 
005705L 
005706L 
005706U 
005707L 
0i57l0L 
»i057JlL 
>005712L 



005718L 



005713L 
0057i4L 
005718L 
005716L 
005717L 
005720L 
>0a5721L 
»005722L 



00U0UI 
00110001 

00110U1 
11011000 
00110U1 
110U1U 

00110111 

11001H0 
11011100 

00110001 

00110111 
01011001 

11001111 



00110001 
00110U1 
00110001 
00110111 
11011000 
00110111 
01011001 
11001111 



00001001 
11010000 
00100110 
00111011 
00101001 
00111001 

00101010 

1 11 n 1 1 1 

00111001 
00010101 
10000001 

IIUUU 

H n 1 1 1 1 



11010000 
00100110 
11010001 
00100111 
00101100 
00101001 

IIIUIU 
llllUll 



* 

UBIOJ 

3,85 

6^40 

D ft 9 n 

6,60 



U8IN2 
U8IN 



U80UT 



U80UT 
U8TN 

U80UT2 
UB1N2 

BEGIN 

IF SWUSER IN PSW 
THEN EXIT flVIOLDl 
TSTIP ,SS^USER,PSWI 

BRA IVI0L5,FZ 
H8WATT 
IF ODD IMP 

BRA U80UT,Fi,I0 
THEN BEGIN 

STB CDIMP5I 
IF ZERO IMP 

THEN URB fa MBIN CURA) 
ELSE URB }■ M8IN2 (URA) 
END 
STB DIMP 

MIFADR#URUURA 



ONLY IS PRIV'D 



111, 113 CODES 

lU 145 - UBIN 
113 145 - U8IN2 



LOPP 

BRA 
STB 
BRA 

STB 
NOOP 

MBIN 

LDPT 
BR AX 



UBIN2,F#,IZ 

MIFST8 

UBIN 

MIFSTB2 



UR0+UR8 
FETCHI 



ELSE BEGIN 

IF ZERO IMP 
THEN M8US CURAi,URB) 
ELSE M8U82 fURA.rURB) 
ENDl 
LOPP MIPA0R|UR1*URA 

LOPP MIFOAT,URI*URB 

BRA UBQUT2,F#,IZ 
STB HIFSTB 
BRAX FETCHI 



145 - MXIOUT 
062 145 • MXIOUT 



DATAPOINT CONFIDENTlAt INFORHATION • SEE PAGE 1 

PA6E 46 FLEX/TXT MJCPO^PPOCESSOR FLEXIBLE DISKETTE CODE » HJS ^ 78411120 Ui44 

HICRO-BUS 10^ LEVEL INTERFACE INSTRUCTIONS 

12791 0«!5723L U0OUT2 

1281?!. P19I5723L 091U0111 mi9i9lB STB MIFST82 

1281'. >0!?!5724L nidiimt lUltlU BRAX FETCHI 

>0Pl57a5L 11001U1 UUUll 
1282, . RETURN (FETCHI) 

1283^, , ENO MXIOf 

12841 ♦ 

1285. >0«5726L PiitSiimi ItUim IVIOLS 8RAX IVIOLS 

. >005727L 11001111 llllUU 
1286. 



OATAPOINT CONFinENTIAL INFORMATION - SEE PAGE I 



PAGE 47 



FUeX/TXT 



MICPO^PPOCESSOR FLEXIBLE DISKETTE CODE • HJS • 
, INFO INSTRUCTION f010 0P'-C0DE5 



78JUL20 IU44 



1289. 

1290; 

1291'. 

1292' 

1293. 

1294, 

1295, 

1296, 

12971 

12981 

1299, 

13PI0, 

1301, 

1302, 

1303, 

1304, 

1305, 

13061 

1307J 

13081 

1309, 

13101 

1311, 

1312, 

1313, 

1314; 

1315* 

1316, 

1317, 

1318, 

1319; 

13201 



13211 
13221 
1323, 
1324. 
13251 
13861 



005730L 



005730L 
005731L 
005732L 
005733L 
005734L 
005735L 
005736L 

a05737L 
00574(3L 
005741L 
00S742L 
005743L 
005744L 
005745L 
005746L 
>005747L 
►005750L 



11011001 
00U0111 
01010001 
11011000 
00110111 
01010001 
11011111 



0011 
0101 
0011 
0011 
0011 
1101 
0101 
0011 
0101 
1100 



0111 
0001 
01U 
0111 
0111 

1000 
0001 
0111 
1001 
1111 



00011000 
00001001 
00000010 
00100000 
10000000 
00001001 
00011001 

510001001 
00000000 
10000010 
10000011 
10000100 
00011001 

U001101 

10000001 
ItUllll 
llllUll 



* 

INFPI 
2p55 
5,40 
5,95 
5,95 
5,95 
5,95 
5,95 
5,95 
5,95 



INFEXT 



C 

(111 

(062 

(113 

(174 

(115 

(176 

(117 

(022 



0103 

0101 

0105 

0103 
0103 

0103 
0103 

0105 

0105 



NOP 
INFO 
INF02 
INF03 

INF04 
INFOS 
INF06 
INFO? 
INFOS 



INFENO 
INFNO 



CASE IMP OF 
01 I 

II A« VER 

8 » REVI 
21 8a CAPABIUI 

C»0#E « 01 
3,,8fBiCiDfE « 01 
END CASE 
FETCH! 

BRA INFNO, T#,IZ 

STB OIMP 

LDTI VER 

BRA INFEXT, F#,n 

LOPT URO+URA 

LOTI REV 

BRA INFENO 

STB OIMP 
LOPI URQ+URC,0 

LOPT URO+URO 

LOPT URO*URE 

BRA INFENO, F*,IZ 

LDTI CAPA8ILI 

LOPT IJRO + URB 

BRAX FETCHI 



NO-OP (STROBE ON 22003 
A 8 VERSION «, 8 « REVISION « 
8 ■ CAPABILITIES, COE»0 
(CAPAeiLITIES3 



BCOE 


B 





BCOE 


S 





BCOE 


m 





BCOE 


■ 





BCOE 


m 





BCOE 


m 






CHECK IF ITS I tUl3 

(ASSUME S05 

NO SEE IF 2 OR ABOVE 

SET PROCESSOR VERSION AND REVISION LEVEL 



CHECK IF ITS 2 (0623 



SET CDE « IN ANY CASE 

WAS IT 062 OR OTHER? 
VE8, 062 SET CAPABILITIES 
SET B«REGI8TER 
AND DONE 



OATAPOINT CONFIDENTIAL INFORMATION " SEE PAGE I 



PA5E 48 



FLEX/TXT 



MICP0»PR0CE5SPR FLEXIBLE DISKETTE CODE • HJS • 
, INFO INSTRUCTION (010 OP^pCOOE) 



78JUL20 11144 



1327; 

1328. 



13291 
1330. 



133i; 
1332, 
1333. 

1334; 

1335. 



005751L 01011CI01 1111«110 
0e»5752L 11011111 10^«^110 



« 
MEMPF6 



8RAX 



MfMPF4 



i097S3L 
0f5794L 
i«5755L 
0e»57S6L 
e!05757L 
0(i55765IL 
005761L 
005762L 
0«5763L 
00S764L 
0!»IS765L 
0I?I5766L 
0!»5767L 
m5779il 

00577a 
00S772L 
0i5773L 
005774L 
PI0577SL 
005776L 
00S777L 

002000 
004000 

004000 



1 1 1 1 1 1 1 

1 1 1 1 1 u 
UllU! 
UlUll 
U 1 1 1 U 
1 1 1 1 11 1 
U 1 1 1 1 1 

iium 

1 1 1 1 1 u 
11 U 11 1 

1 1 1 n 1 1 

lUllU 

iiuiu 

llUlll 

1 1 1 1 1 1 1 

1 u 1 1 u 

uuui 

lllllU 

1 1 1 1 1 1 1 
1 1 1 1 1 1 1 
1111111 



1111 
uu 
nil 
nil 
I 111 
1111 
uu 
uu 
uu 
uu 
mi 
uu 
uu 
an 
uu 
uu 
mi 
uu 
uu 
uu 
uu 



uu 
uu 
uu 
uu 
uu 
uu 
I III 
uu 
uu 
uu 
uu 
uu 
uu 
uu 
uu 
uu 
nil 
uu 
uu 
uu 
uu 



TA8PAGC FLCXL 



FLEXLEN RQU 
USE 
SKIP 
END 



SfFLEXP 

FLEXL 

FLEXLEN 



OATAPOINT CONFIDENTIAL INFORMATION *. SEE PAGE 1 



'A6E 49 


FLEX/TXT 






HICROp 


PROCESSOR 


FLEXIiLE 


OISKETTE CODE 


• HJ8 • 


7ejUL20 1U44 






AC 


104 


114 


408 


410 


412 


414 


426 


428 


430 


432 


470 


472 






474 


480 


482 


484 


851 


855 


991 


1124 


1197 








018017 


ACCTt 


*77IA 
























0J««l« 


ACD 


«74IA 
























ei0gi7 


ACPH 


♦ 76IA 
























010016 


ACPL 


*75M 
























000001 


APF 


*9IA 
943 


120iA 
962 


232 

969 


239 


255 


259 


285 


289 


501 


513 


916 


920 


010014 


APFRK 


*68tA 
























010013 


APFPP 


*67tA 
























010016 


APFTK 


• 70IA 
























010015 


APFTP 
66 


*69iA 
l23iA 
























004322 


8IN06L 


*379 


207 


272 


278 


570 


597 


682 


686 










004371 


BINOEP 


*439 


407 


425 




















004400 


B0TIN8 


*446 


553 


701 


703 


















020006 


8R 


*42tA 


103 


150 


153 


169 


171 


176 


178 


197 


198 


200 


206 






217 


223 


270 


404 


422 


476 


486 


561 


582 


633 


881 


699 






735 


742 


744 


753 


754 


755 


762 


764 


766 


779 


781 


806 






807 


818 


819 


826 


827 


834 


835 


836 


854 


856 


863 


864 






871 


872 


879 


1034 


1042 


1059 


1087 


1090 


1099 


1101 


1107 


1125 






1151 


1154 


1157 


1246 


1264 


















C0 


851 


U97 
























CI 


439 


855 


1043 




















000100 


CAP55I0 


♦123IA 


126JA 






















000316 


CAPA8ILI 


♦126IA 


1324 






















000010 


CAPAPF 


* 1201 A 


126IA 






















000004 


CAPBUtlE 


♦ 1 1 9 i A 


126tA 






















000200 


CAPCOM 


*124IA 


126tA 






















000000 


CAPCYNT 


*l2ltA 


126iA 






















000000 


CAPGUPY 


*118?A 


126IA 






















00000} 


CAPMICR 


♦117IA 


l26iA 






















000000 


CAPRIM 


♦122IA 


l26iA 
























CC 


102 


108 


114 


360 


366 


370 


374 


402 


419 


435 


468 


637 






924 


930 


942 


987 


9<Jl 


1046 


1090 


1106 


1126 








007000 


COOP 


♦134IA 
























006000 


coax 


*133U 


























CF 


101 


105 


114 


146 


150 


151 


153 


169 


176 


177 


178 


197 






198 


199 


200 


206 


209 


235 


251 


270 


274 


280 


287 


293 






295 


310 


311 


356 


357 


362 


363 


364 


367 


369 


370 


372 






373 


374 


436 


439 


465 


466 


478 


508 


542 


552 


562 


583 






627 


653 


654 


656 


657 


658 


681 


684 


688 


699 


700 


702 






735 


742 


753 


754 


755 


761 


762 


763 


764 


765 


766 


779 






780 


781 


790 


806 


807 


808 


809 


818 


819 


826 


827 


834 






839 


836 


852 


853 


656 


858 


863 


864 


871 


872 


888 


908 






936 


973 


983 


984 


986 


988 


1004 


1034 


1038 


1042 


1043 


1059 






1071 


1072 


1076 


1077 


1080 


1087 


1099 


1100 


1124 


1151 


1154 


1157 






1182 


1183 


U84 


1187 


1188 


1197 


1217 


1218 


1219 


1225 


1226 




03001J 


COMMOOf 


*96IA 
























004262 


CRCGEN 


*314 


252 


271 


509 


















004255 


CRCGENX 


*304 


219 


544 


554 


573 


601 














004264 


CRCGENY 


♦ 358 


312 























DATAPOINT CONFIDENTIAL INFORMATION • SEE PAGE I 



AGE 518 


FLE5(/TXT 




MICRO" 


PROCESSOR 


FLEXIBLE 


DISKETTE COD 


0114053 


DBLREO 
OegMRH 
0E2MRL 


♦ 162 
982 
982 


608 
1186 
1186 












DIMP 


1255 


1312 


1319 










OMAR 


945 












004024 


DONIO 


♦131 


177 


780 








005023 


DHREAn 


♦ 795 












005217 


DOWDCS 


♦ 878 


843 










005134 


DOWRlTg 


♦ 841 


791 












FCINDT 


206 


270 


560 


569 


581 


596 681 




FCINST 


169 


742 












FCLEAB 


153 


178 


200 


735 


764 


781 835 




FCOINT 


150 


176 


198 


762 


779 


807 




FCOMOD 


105 


856 












FCOSYL 


754 


819 


827 










FCOSYM 


753 


818 


826 










FCDTOP 


755 


834 


863 


871 








FCOTUP 


197 


806 


1034 


1059 


1151 






FCOIITC 


528 


540 


551 


699 


1042 


1087 1090 




FCRHOR 


766 














FCRTIM 


836 














FCWOCR 


888 














FCi«OGP 


872 














FCWRTN 


864 












005303 


FOATA 


♦ 963 


904 










005312 


FDATAl 
FOOBU 


♦ 975 
1053 


967 










004640 


FDEOT 


♦ 693 


674 










005547 


FDEWPI 


♦ 1144 


7i!i6 










004656 


FOEWPIX 


♦ 706 


696 










004547 


PDF 


♦ 614 


509 


531 


573 


604 




004441 


Ff)FCNS 


♦ 498 


586 


611 








004516 


FOFINC 


♦ 572 


S63 










004536 


FOFINP 


♦ 599 


584 










004545 


FDFIS 


♦ 606 


544 


554 








004567 


FOFUENO 


♦ 639 


627 


636 








004560 


FOFNXT 


♦ 632 


626 










004531 


F5FT8L 


♦ 594 


1124 


1128 








005352 


FniNIT 

FOUTO 

FDMASK 

FDNINV 

FONOT 

FDOUT 


♦ 1019 

1069 

1123 

673 

695 

966 


1082 

1026 










004663 


FDRCRC 


♦ 720 


685 


689 








005420 


F0RD8L 


*1056 


1054 










004660 


FORDTA 


♦ 712 


571 


598 


683 


687 




005415 


FOREG 


♦ 1049 


1031 










005545 


FDRSYNC 
FDSMSK 


♦ 1135 
990 


1102 


1108 








005352 


FDTBi. 


♦ 1014 


991 










0046J5 


FDTENO 


♦ 665 


644 


1009 









78JUL20 UJ44 



1099 



1154 



1157 



DATAPOIKIT CONFIOENTIAL INFORMATION - SEE PAGE 1 



PAGE 51 


FLEX/TXT 




MICRO* 


PROCESS 


005345 


FOTENX 


♦ 1008 


1012 






005539 


FDTFCN 


• 1U6 


1013 


1027 


1047 


00Sil4 


FOTFIN 


*tl«l 


691 


10U 


1147 


004fi3« 


FOTFIX 


*690 


703 






005374 


FOTINI 


♦ 1039 


1044 






005505 


FDTtMVR 


♦ 1098 


1083 






005453 


FOTITO 


♦ 1079 


1074 






00S444 


FOTNRM 


♦ 1075 


1070 








FDWPI 


1030 


1146 






005020 


FENniR 


♦ 1172 


717 


725 


1141 


005041 


FENOIT 
FETCH 


♦ U92 

1200 


1005 








FETCH! 


1221 


1227 


1266 


1278 




FF08L 


800 


858 








FFMASK 


931 


965 








FFROLTD 


813 










FFRMSK 


295 


790 








FFSMSK 


881 










FF8YNC 


932 










FFWMSK 


842 










FlINOX 


108 










FINUN 


101 










FIPNTR 


167 










FITROK 


135 


191 








FKLOFF 


153 


200 








FKLON 


764 


781 








FKMAST 


153 


200 


764 


781 




FKPNTR 


178 










FKRWMF 


735 








00400P 


FLEX 


♦ 132U 


49 






004^00 


FLEXL 


♦51 


53 


443 


771 


008000 


FLEXtEN 


♦ 1332 


1334 






004000 


FLEXP 


♦ 53 


1332 








FHINDX 


176 


198 


762 


779 




FMPNTR 


198 


807 








FMTRER 


176 


762 


779 


807 




FMTROK 


176 


762 


779 


807 




F043MGC 


851 










F043MSK 


852 










FODR0 


104 


930 








FOLOAD 


104 










FPLHOR 


766 










FPUROTA 


836 










FPLWD8L 


872 










FPUWSGL 


864 


1151 








FPTHDR 


755 










FPTRDTA 


806 


834 


1059 






FPTRKH 


197 










FPTWOBL 


871 










FPTWSGL 


863 


1034 


1151 






FRBUSV 


125 


138 


908 


930 




FRORV 


102 


853 


929 





78JUt20 11144 



iei9l 



1281 



1326 






807 



973 



OATAPOINT CONFIoeNTIAL INFORHATIOW •» SEE PAGE I 



PAGE 52 


FLEX/1 


PXT 




MICRO- 


PROCESSOR 


FLE><I81E 


DISKETTE CODE 


«• HJS « 


784UL2i 11144 






FRINDX 


125 
























FRIXCT 


114 


934 






















FRIXEX 


934 
























FSGAP 


170 
























FSONLN 


743 






















?l»5231 


FXIO 


*a94 






















005265 


FXIOl 


♦ 935 


933 




















00402? 


FXIQER 


♦ 122 


745 


748 


















0056S2 


FXSTAT 


♦ 1205 






















?l»4107 


HDRCHK 


♦ 186 


765 




















004171 


HDRCNKi 


♦ 233 


199 




















004140 


HRRCOM 


♦ 201 


252 




















004212 


HDRCRC 


♦ 256 


251 




















004675 


Hf^REAR 


♦ 737 
296 


136 

880 


192 
882 


208 


218 


224 


249 


273 


275 279 


281 


294 


004666 


HORERD 


♦ 730 


116 


168 


172 
















005000 


HDROK 


♦ 77S 


297 




















004253 


HDROKX 


♦ 297 


292 




















004021 


HRSTRT 
HL2MRH 
HL2HRL 
IMAR 


♦115 
985 
985 
507 


942 

603 


607 


911 
















005746 


INFENH 


♦ 1325 


1317 


1323 


















005737 


INFfXT 


♦ 1319 


1314 




















005747 


INFNO 


♦ 1326 


1311 




















005730 


INFO 


♦ 1290 






















020005 


10 
IT 


♦ 41IA 
439 


1248 
1043 






















ITW 


274 


280 


287 


293 


684 


688 














IVJOIS 


1285 






















005726 


IVIDL5 


♦ 1285 


902 


1213 


1245 
















020004 


U 


♦ 40IA 


904 


1221 


1257 


1276 


1311 


1314 


1323 








010001 


KBSCNT 
tIMP 


♦ 49IA 

949 






















030000 


LINK 
LUF 


♦82SA 

950 


310 
1197 


356 


375 


402 


437 


439 


440 


465 491 


991 


992 


010003 


MADR 


♦ 54IA 


105 


150 


153 


169 


176 


178 


197 


198 200 


206 


270 






637 


654 


681 


699 


735 


742 


753 


754 


755 762 


764 


766 






779 


781 


806 


807 


818 


819 


826 


827 


834 835 


836 


856 






863 


864 


871 


872 


888 


924 


986 


988 


1034 1042 


1059 


1087 






1090 


1099 


1126 


1151 


1154 


1157 


1184 












HARIM 


964 


1188 






















HARIL 


984 


1188 






















MARDH 


234 


257 


921 




















MAROU 


234 


2S7 


921 


















010004 


M8ITS 


♦ 55IA 
973 


102 
1217 


114 
1226 


148 


295 


790 


809 


853 


858 908 


930 


936 


004000 


MBPASF 


♦ 94 






















010005 


MBSTAT 


♦ 56IA 


109 


151 


177 


199 


229 


251 


627 


638 653 


765 


780 






808 


942 


987 


1124 


1130 


1183 


1225 










004000 


MBSTRT 


♦ 99 


951 




















010006 


MCRCH 


♦ 57IA 


274 


311 


357 


362 


363 


369 


372 


508 657 


658 


684 
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FLEX/TXT 






MICRO- 


PROCESSOR 


FLEXIBLE 


DISKETTE CODE 


9 HJS » 


78JUL20 11144 








700 


763 


983 


984 


1071 


1076 


1187 


1188 










§i(!^m7 


HCRCL 

MDR 


*58iA 
1071 
237 


280 

1076 

287 


363 

1187 

506 


364 

1188 

541 


374 
552 


657 


658 


688 


702 


761 


983 


984 


01CI01CT 


MOSKS 


*59IA 


209 


295 


287 


1219 
















010011 


M08KT 

MDW 


*60iA 

600 


235 
922 


851 
946 


1218 


















004571 


MEMPF4 


*65l 


602 


634 


1129 


1328 
















005751 


HEMPFS 


♦ 1328 


944 






















00402? 


MFMPFOS 


♦ 120 


233 


236 


256 


286 


















MIFAOR 


105 


150 


153 


169 


176 


178 


197 


198 


200 


206 


270 


528 






540 


551 


560 


569 


581 


596 


681 


699 


735 


742 


753 


754 






755 


762 


764 


766 


779 


781 


806 


807 


818 


819 


826 


827 






834 


835 


836 


856 


863 


864 


871 


872 


888 


1034 


1042 


1059 






!087 


1090 


1099 


1151 


1154 


1157 


1256 


1274 












MIFOAT 


104 


150 


153 


176 


178 


197 


198 


200 


477 


487 


529 


541 






735 


753 


754 


75S 


762 


764 


766 


779 


781 


806 


807 


818 






819 


826 


827 


834 


835 


836 


855 


663 


664 


871 


872 


1034 






1042 


1059 


1887 


1090 


1151 


U54 


1157 


1275 












MIFIN 


171 


217 


223 


405 


423 


561 


582 


744 


1101 


1107 


1284 






MIFST8 


105 


150 


153 


169 


176 


178 


197 


198 


200 


215 


221 


401 






418 


477 


490 


530 


543 


560 


581 


735 


742 


753 


754 


755 






762 


784 


766 


779 


781 


806 


807 


818 


819 


826 


827 


834 






835 


836 


656 


863 


864 


871 


872 


888 


1034 


1042 


1059 


1087 






1090 


1099 


1105 


1151 


1154 


U57 


1258 


1277 












MIF8T82 


1261 


1280 






















020082 


MO 

MOOW 


*38U 
1199 


233 


236 


256 


286 


602 


634 


944 


1127 








020003 


MP 

HR2HtH 

MR2HI.L 

MR2PCH 

MR2PCt 


♦ 39U 

655 

655 

912 

912 


233 
1185 
1185 


296 


256 


286 


602 


634 


944 


1129 








010013 


M8ECT 


*62tA 
























010012 


MTRAK 


♦ 61 lA 
























005342 


NOTYET 


*1000 


909 


974 




















010000 


PDLNP 


«4BilA 
























004027 


PENDR 


♦ 143 


127 






















000040 


PRE 


♦ 3iA 
























000000 


PROC 


*130U 
























002000 


PROD 
PSWI 
PSWO 


♦131IA 

901 
1198. 


1198 


1212 


1244 


















010002 


Q 


*46IA 


293 


360 


366 


370 


435 


466 


1046 










030006 


RCRCH 


♦ 93iA 
























030007 


RCRCU 


*94IA 
























03000S 


ROATA 


*92tA 
























005105 


RDOUTD 


*829 


820 






















005067 


RDNORM 


♦ 823 


814 






















005046 


RDSGl 


♦ 811 


801 






















000011 


REV 


♦ 2f A 


1316 






















030004 


RPNTR 


♦ 91IA 
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FIEX/TXT 




MICROwPROCESSOR 


FLEXIBLE 


DISKETTE CODE 


• HJS • 


78JUL20 1 


U44 




030003 


RSTAT 
SACPC 
8A0UAL 
SB 


♦ 90IA 
761 
753 
621 


763 
754 






















010002 


SCANSV 

SCHUMS 

SCMBUS 

SDCRC 

SODUAL 

SL 

SMCRC 

SMOUAL 

SMR 


♦ 50IA 

228 

228 
1076 

896 

360 
1071 

818 

234 


827 

366 

819 
257 


1077 
370 

1072 

507 


1078 
435 

1073 

607 


468 
1119 


















SOCLK 


216 


222 


403 


406 


421 


424 


475 


485 


529 


1154 


1157 






SRVSSN 


156 


180 


768 


837 


865 


873 


889 














sRvno 


230 


























SRVREO 


228 


635 


643 






















SRVRPT 


659 


























SVM8ECT 


257 


























8VMTRAK 


234 


921 
























SWRPT 


1198 


























SWUSER 


901 


1212 


1244 




















030001 


TEMPI 


♦ 83IA 


iSJA 


101 


108 


311 


419 


436 


466 


478 


542 


552 


562 






983 


700 


702 


852 


855 


1004 


1038 


1043 


1182 


1197 






030002 


TEHP2 


*84tA 


861 A 


362 


364 


367 


370 


373 












030001 


TEMPH 


♦ 85IA 


656 


658 


1080 


1087 


1100 














030002 


TEMPL 


*86IA 


656 


658 


1072 


1077 


1090 


1106 












000001 


TYPE 


*5iA 


12IA 


117IA 


119tA 


124IA 
















005706 


UBIN 


♦ 1263 


1259 






















005704 


UBIN2 


♦1260 


1257 






















005671 


UBIO 


♦ 1235 
























005713 


UBOUT 


♦ 1269 


1248 






















00S723 


UiOUT2 

UOEH 

UDEL 


• 1279 
656 
656 


1276 
657 
657 


983 
983 


1187 
1187 




















URA 


924 


988 


1217 


1256 


1274 


1315 
















URB 


628 
1385 


673 


931 


965 


990 


1025 


1069 


1082 


1123 


1167 


1265 


1275 




URC 


621 


929 


1035 


1057 


1320 


















URO 


922 


1218 


1321 






















URE 


946 


1219 


1322 






















URH 


653 


987 


1183 






















URI 


621 


628 


653 


654 


656 


873 


922 


924 


929 


931 


946 


965 






986 


990 


1025 


1069 


1082 


1123 


1167 


1183 


1184 


1256 


1274 


1275 




URL 


654 


986 


1184 






















URO 


621 


628 


657 


983 


986 


987 


1025 


1035 


1057 


1167 


1187 


1217 






1218 


1219 


1265 


1315 


1320 


1321 


1322 


1325 










030012 


URPNTR 


♦ 97JA 
























030010 


UXPNTR 


♦ SSIA 
























000002 


VER 


♦ 11 A 


1313 






















005177 


WDBL 


♦ 868 


859 






















030016 


XCRCH 


♦ 10nA 

























PA6E 55 



FUEi</TXT 



DATAPOINT CONFIDENTIAL INFORMATION «• SEE PASE I 
MICROfPROCESSOR FLEXIBLE DISKETTE CODE - HJS - 



7SJUL2SJ in44 



030017 XCRCL 

(?I3001S XDATA 

030014 XPNTR 

030013 XSTAT 



♦l0eiA 

♦100IA 

♦ 991 A 

♦ SSIA 



